Commit e68a8919 authored by SamB's avatar SamB

Zap stray whitespace in lhs formatting

parent 62c79599
......@@ -236,7 +236,7 @@ isBoxed Unboxed = False
%* *
%************************************************************************
\begin{code}
\begin{code}
data RecFlag = Recursive
| NonRecursive
deriving( Eq )
......
......@@ -518,7 +518,7 @@ ifaceStats eps
hsep [ int (n_rules_out stats), text "rule decls imported, out of",
int (n_rules_in stats), text "read"]
]
\end{code}
\end{code}
%************************************************************************
......
......@@ -553,7 +553,7 @@ completeBind env top_lvl old_bndr new_bndr new_rhs
loop_breaker = isNonRuleLoopBreaker occ_info
old_info = idInfo old_bndr
occ_info = occInfo old_info
\end{code}
\end{code}
......
......@@ -827,7 +827,7 @@ checkDistinctTyVars sig_tvs
<+> quotes (ppr tidy_tv2)
; failWithTcM (env2, msg) }
where
\end{code}
\end{code}
@getTyVarsToGen@ decides what type variables to generalise over.
......
......@@ -309,7 +309,7 @@ checkCg check
case check target of
Nothing -> returnM ()
Just err -> addErrTc (text "Illegal foreign declaration:" <+> err)
\end{code}
\end{code}
Calling conventions
......
......@@ -184,7 +184,7 @@ gadtRefine (Reft in_scope env1)
do_one reft co_var = unify reft (TyVarTy co_var) ty1 ty2
where
(ty1,ty2) = splitCoercionKind (tyVarKind co_var)
\end{code}
\end{code}
%************************************************************************
%* *
......
......@@ -221,7 +221,7 @@ addFamInsts tycons thing_inside
mkLocalFamInstTyThing (ATyCon tycon) = mkLocalFamInst tycon
mkLocalFamInstTyThing tything = pprPanic "TcInstDcls.addFamInsts"
(ppr tything)
\end{code}
\end{code}
\begin{code}
tcLocalInstDecl1 :: LInstDecl Name
......
......@@ -65,7 +65,7 @@ tcInfer tc_infer
; res <- tc_infer (mkTyVarTy box)
; res_ty <- readFilledBox box -- Guaranteed filled-in by now
; return (res, res_ty) }
\end{code}
\end{code}
%************************************************************************
......
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