CoreLint: Use size-annotated ppr variant
authorBen Gamari <ben@smart-cactus.org>
Mon, 22 Jun 2015 10:48:07 +0000 (12:48 +0200)
committerBen Gamari <ben@smart-cactus.org>
Thu, 16 Jul 2015 21:12:19 +0000 (23:12 +0200)
compiler/coreSyn/CoreLint.hs

index e5d0127..b00e1ac 100644 (file)
@@ -210,7 +210,7 @@ dumpPassResult dflags unqual mb_flag hdr extra_info binds rules
     dump_doc  = vcat [ nest 2 extra_info
                      , size_doc
                      , blankLine
-                     , pprCoreBindings binds
+                     , pprCoreBindingsWithSize binds
                      , ppUnless (null rules) pp_rules ]
     pp_rules = vcat [ blankLine
                     , ptext (sLit "------ Local rules for imported ids --------")