diff options
Diffstat (limited to 'compiler/GHC/Driver/Pipeline.hs')
| -rw-r--r-- | compiler/GHC/Driver/Pipeline.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/GHC/Driver/Pipeline.hs b/compiler/GHC/Driver/Pipeline.hs index 3c31e34eb8..ca6d501be6 100644 --- a/compiler/GHC/Driver/Pipeline.hs +++ b/compiler/GHC/Driver/Pipeline.hs @@ -353,7 +353,9 @@ compileForeign hsc_env lang stub_c = do LangObjc -> Cobjc LangObjcxx -> Cobjcxx LangAsm -> As True -- allow CPP +#if __GLASGOW_HASKELL__ < 811 RawObject -> panic "compileForeign: should be unreachable" +#endif (_, stub_o, _) <- runPipeline StopLn hsc_env (stub_c, Nothing, Just (RealPhase phase)) Nothing (Temporary TFL_GhcSession) |