X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FStaticFlags.hs;h=31b9414339dfaff5d8a263b87455069428e8d8a8;hb=a6d4d67ef5fae791619d91baee80f79764eb3257;hp=039051b8b9490af824c396f765a42c715c236bae;hpb=9226af9eef1cc45dd745ce21ddeb36a0be0da708;p=ghc-hetmet.git diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs index 039051b..31b9414 100644 --- a/compiler/main/StaticFlags.hs +++ b/compiler/main/StaticFlags.hs @@ -226,7 +226,7 @@ GLOBAL_VAR(v_opt_C_ready, False, Bool) staticFlags = unsafePerformIO $ do ready <- readIORef v_opt_C_ready if (not ready) - then panic "a static opt was looked at too early!" + then panic "Static flags have not been initialised!\n Please call GHC.newSession or GHC.parseStaticFlags early enough." else readIORef v_opt_C -- -static is the default