diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-11 21:35:41 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-11 21:35:41 +0100 |
| commit | 9d246714d9f3646030b2788030b503664707c46c (patch) | |
| tree | 92934454880e00681743ae5a5b97b24990187e9a /compiler/main/ErrUtils.lhs | |
| parent | 310ded12b731e5700b4af739a080c3e23904b41e (diff) | |
| download | haskell-9d246714d9f3646030b2788030b503664707c46c.tar.gz | |
Pass DynFlags down to hPrintDump
Diffstat (limited to 'compiler/main/ErrUtils.lhs')
| -rw-r--r-- | compiler/main/ErrUtils.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/main/ErrUtils.lhs b/compiler/main/ErrUtils.lhs index eeb5e91c8a..c97ab2aef2 100644 --- a/compiler/main/ErrUtils.lhs +++ b/compiler/main/ErrUtils.lhs @@ -247,7 +247,7 @@ dumpSDoc dflags dflag hdr doc writeIORef gdref (Set.insert fileName gd) createDirectoryIfMissing True (takeDirectory fileName) handle <- openFile fileName mode - hPrintDump handle doc + hPrintDump dflags handle doc hClose handle -- write the dump to stdout |