Commit 5a0f9984 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

(F)SLIT -> (f)sLit in Type

parent d365fe1e
......@@ -1323,9 +1323,9 @@ zip_ty_env tvs tys env = pprTrace "Var/Type length mismatch: " (ppr
instance Outputable TvSubst where
ppr (TvSubst ins env)
= brackets $ sep[ ptext SLIT("TvSubst"),
nest 2 (ptext SLIT("In scope:") <+> ppr ins),
nest 2 (ptext SLIT("Env:") <+> ppr env) ]
= brackets $ sep[ ptext (sLit "TvSubst"),
nest 2 (ptext (sLit "In scope:") <+> ppr ins),
nest 2 (ptext (sLit "Env:") <+> ppr env) ]
\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