Skip to content
Snippets Groups Projects
Commit 3012c431 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Add Outputable Report in TcErrors

...just for debug output
parent 66a8c194
No related branches found
No related tags found
No related merge requests found
......@@ -216,6 +216,11 @@ data Report
, report_relevant_bindings :: [SDoc]
}
instance Outputable Report where -- Debugging only
ppr (Report { report_important = imp, report_relevant_bindings = rel })
= vcat [ text "important:" <+> vcat imp
, text "relevant:" <+> vcat rel ]
{- Note [Error report]
The idea is that error msgs are divided into three parts: the main msg, the
context block (\"In the second argument of ...\"), and the relevant bindings
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment