Delete old comments referring to newSession
authorAustin Seipp <austin@well-typed.com>
Wed, 2 Oct 2013 01:48:21 +0000 (20:48 -0500)
committerAustin Seipp <austin@well-typed.com>
Wed, 2 Oct 2013 01:48:21 +0000 (20:48 -0500)
As Herbert pointed it, it was removed a long time ago.

Authored-by: Kazu Yamamoto <kazu@iij.ad.jp>
Signed-off-by: Austin Seipp <austin@well-typed.com>
compiler/main/DynFlags.hs
compiler/main/StaticFlags.hs

index d651d25..83d9bca 100644 (file)
@@ -1250,7 +1250,7 @@ dynamicTooMkDynamicDynFlags dflags0
 
 -----------------------------------------------------------------------------
 
--- | Used by 'GHC.newSession' to partially initialize a new 'DynFlags' value
+-- | Used by 'GHC.runGhc' to partially initialize a new 'DynFlags' value
 initDynFlags :: DynFlags -> IO DynFlags
 initDynFlags dflags = do
  let -- We can't build with dynamic-too on Windows, as labels before
@@ -1287,7 +1287,7 @@ initDynFlags dflags = do
         }
 
 -- | The normal 'DynFlags'. Note that they is not suitable for use in this form
--- and must be fully initialized by 'GHC.newSession' first.
+-- and must be fully initialized by 'GHC.runGhc' first.
 defaultDynFlags :: Settings -> DynFlags
 defaultDynFlags mySettings =
      DynFlags {
index 1eb01ca..8b82f17 100644 (file)
@@ -81,7 +81,7 @@ parseStaticFlagsFull :: [Flag IO] -> [Located String]
                      -> IO ([Located String], [Located String])
 parseStaticFlagsFull flagsAvailable args = do
   ready <- readIORef v_opt_C_ready
-  when ready $ throwGhcExceptionIO (ProgramError "Too late for parseStaticFlags: call it before newSession")
+  when ready $ throwGhcExceptionIO (ProgramError "Too late for parseStaticFlags: call it before runGhc or runGhcT")
 
   (leftover, errs, warns) <- processArgs flagsAvailable args
   when (not (null errs)) $ throwGhcExceptionIO $ errorsToGhcException errs
@@ -100,7 +100,7 @@ staticFlags :: [String]
 staticFlags = unsafePerformIO $ do
   ready <- readIORef v_opt_C_ready
   if (not ready)
-        then panic "Static flags have not been initialised!\n        Please call GHC.newSession or GHC.parseStaticFlags early enough."
+        then panic "Static flags have not been initialised!\n        Please call GHC.parseStaticFlags early enough."
         else readIORef v_opt_C
 
 -- All the static flags should appear in this list.  It describes how each