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
case mb_lhs of
Nothing -> do { warnDs decomp_msg; return Nothing }
Just (_, args) -> do
{ f_body <- fix_up (Let mono_bind (Var mono_id))
Just (_, args) -> do {
f_body <- fix_up (Let mono_bind (Var mono_id))
; let local_poly = setIdNotExported poly_id
-- Very important to make the 'f' non-exported,
......
......@@ -541,15 +541,15 @@ mkErrorAppDs err_id ty msg = do
\end{code}
*************************************************************
%************************************************************************
%* *
\subsection{Making literals}
%* *
%************************************************************************
\begin{code}
mkCharExpr :: Char -> CoreExpr -- Returns C# c :: Int
mkIntExpr :: Integer -> CoreExpr -- Returns I# i :: Int
mkCharExpr :: Char -> CoreExpr -- Returns @C# c :: Int@
mkIntExpr :: Integer -> CoreExpr -- Returns @I# i :: Int@
mkIntegerExpr :: Integer -> DsM CoreExpr -- Result :: Integer
mkStringExpr :: String -> 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