Commit 3012c431 authored by Simon Peyton Jones's avatar Simon Peyton Jones

Add Outputable Report in TcErrors

...just for debug output
parent 66a8c194
......@@ -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
......
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