Commit 15b860cb authored by Thomas Schilling's avatar Thomas Schilling

Fix Haddock errors.

parent 675bfa11
...@@ -346,9 +346,9 @@ dsSpec all_tvs dicts tvs poly_id mono_id mono_bind ...@@ -346,9 +346,9 @@ dsSpec all_tvs dicts tvs poly_id mono_id mono_bind
case mb_lhs of case mb_lhs of
Nothing -> do { warnDs decomp_msg; return Nothing } Nothing -> do { warnDs decomp_msg; return Nothing }
Just (_, args) -> do Just (_, args) -> do {
{ f_body <- fix_up (Let mono_bind (Var mono_id)) f_body <- fix_up (Let mono_bind (Var mono_id))
; let local_poly = setIdNotExported poly_id ; let local_poly = setIdNotExported poly_id
-- Very important to make the 'f' non-exported, -- Very important to make the 'f' non-exported,
......
...@@ -541,15 +541,15 @@ mkErrorAppDs err_id ty msg = do ...@@ -541,15 +541,15 @@ mkErrorAppDs err_id ty msg = do
\end{code} \end{code}
************************************************************* %************************************************************************
%* * %* *
\subsection{Making literals} \subsection{Making literals}
%* * %* *
%************************************************************************ %************************************************************************
\begin{code} \begin{code}
mkCharExpr :: Char -> CoreExpr -- Returns C# c :: Int mkCharExpr :: Char -> CoreExpr -- Returns @C# c :: Int@
mkIntExpr :: Integer -> CoreExpr -- Returns I# i :: Int mkIntExpr :: Integer -> CoreExpr -- Returns @I# i :: Int@
mkIntegerExpr :: Integer -> DsM CoreExpr -- Result :: Integer mkIntegerExpr :: Integer -> DsM CoreExpr -- Result :: Integer
mkStringExpr :: String -> DsM CoreExpr -- Result :: String mkStringExpr :: String -> DsM CoreExpr -- Result :: String
mkStringExprFS :: FastString -> DsM CoreExpr -- Result :: String mkStringExprFS :: FastString -> DsM CoreExpr -- Result :: String
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment