diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-12 18:52:05 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-12 18:52:05 +0100 |
| commit | ab50c9c527d19f4df7ee6742b6d79c855d57c9b8 (patch) | |
| tree | ac78c3fda6f3a8ec8235345f7b02518e0d809ba0 /compiler/main/DriverMkDepend.hs | |
| parent | 543ec0852722318665d2f5228e29d44a5fc973f5 (diff) | |
| download | haskell-ab50c9c527d19f4df7ee6742b6d79c855d57c9b8.tar.gz | |
Pass DynFlags down to showSDoc
Diffstat (limited to 'compiler/main/DriverMkDepend.hs')
| -rw-r--r-- | compiler/main/DriverMkDepend.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/main/DriverMkDepend.hs b/compiler/main/DriverMkDepend.hs index 5db927a952..953b2c4568 100644 --- a/compiler/main/DriverMkDepend.hs +++ b/compiler/main/DriverMkDepend.hs @@ -176,9 +176,9 @@ processDeps :: DynFlags -- -- For {-# SOURCE #-} imports the "hi" will be "hi-boot". -processDeps _ _ _ _ _ (CyclicSCC nodes) +processDeps dflags _ _ _ _ (CyclicSCC nodes) = -- There shouldn't be any cycles; report them - ghcError (ProgramError (showSDoc $ GHC.cyclicModuleErr nodes)) + ghcError (ProgramError (showSDoc dflags $ GHC.cyclicModuleErr nodes)) processDeps dflags hsc_env excl_mods root hdl (AcyclicSCC node) = do { let extra_suffixes = depSuffixes dflags |