Commit ddb4c07d authored by mnislaih's avatar mnislaih
Browse files

Fix rendering of references in :print under -fprint-evld-with-show flag

parent a27c5f77
......@@ -177,7 +177,6 @@ showTerm cms@(Session ref) term = do
GHC.setSessionDynFlags cms dflags
cPprShowable prec NewtypeWrap{ty=new_ty,wrapped_term=t} =
cPprShowable prec t{ty=new_ty}
cPprShowable prec RefWrap{wrapped_term=t} = cPprShowable prec t
cPprShowable _ _ = return Nothing
needsParens ('"':_) = False -- some simple heuristics to see whether parens
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