[project @ 2001-09-06 14:26:14 by apt]

change ext-core output file suffix from .core (too easy to delete accidentally) to .hcr (MERGE TO STABLE)

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index 4ab9f55..0ba12ac 100644 (file)
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -512,7 +512,7 @@ run_phase Hsc basename suff input_fn output_fn
         let dyn_flags' = dyn_flags { hscOutName = output_fn,
                                     hscStubCOutName = basename ++ "_stub.c",
                                     hscStubHOutName = basename ++ "_stub.h",
-                                    extCoreName = basename ++ ".core" }
+                                    extCoreName = basename ++ ".hcr" }
 
   -- run the compiler!
         pcs <- initPersistentCompilerState
@@ -1036,7 +1036,7 @@ compile ghci_mode summary source_unchanged have_object
    let dyn_flags' = dyn_flags { hscOutName = output_fn,
                                hscStubCOutName = basename ++ "_stub.c",
                                hscStubHOutName = basename ++ "_stub.h",
-                               extCoreName = basename ++ ".core" }
+                               extCoreName = basename ++ ".hcr" }
 
    -- figure out which header files to #include in a generated .hc file
    c_includes <- getPackageCIncludes

diff --git a/ghc/utils/ext-core/Driver.hs b/ghc/utils/ext-core/Driver.hs
index c7af9cf..2328eca 100644 (file)
--- a/ghc/utils/ext-core/Driver.hs
+++ b/ghc/utils/ext-core/Driver.hs
@@ -44,43 +44,43 @@ main = do (_,modules) <- foldM process (initialEnv,[]) flist
          let result = evalProgram modules
          putStrLn ("Result = " ++ show result)
          putStrLn "All done"
-       where flist =    ["PrelBase.core",
-                         "PrelMaybe.core",
-                         "PrelTup.core",
-                         "PrelList.core", 
-                         "PrelShow.core",
-                         "PrelEnum.core",
-                         "PrelNum.core",
-                         "PrelST.core",
-                         "PrelArr.core",
-                         "PrelDynamic.core",
-                         "PrelReal.core",
-                         "PrelFloat.core",
-                         "PrelRead.core",
-                         "PrelIOBase.core",
-                         "PrelException.core",
-                         "PrelErr.core",
-                         "PrelConc.core",
-                         "PrelPtr.core",
-                         "PrelByteArr.core",
-                         "PrelPack.core",
-                         "PrelBits.core",
-                         "PrelWord.core",
-                         "PrelInt.core",
-                         "PrelCTypes.core",
-                         "PrelStable.core",
-                         "PrelCTypesISO.core",
-                         "Monad.core",
-                         "PrelStorable.core",
-                         "PrelMarshalAlloc.core",
-                         "PrelMarshalUtils.core",
-                         "PrelMarshalArray.core",
-                         "PrelCString.core",
-                         "PrelMarshalError.core",
-                         "PrelCError.core",
-                         "PrelPosix.core",
-                         "PrelHandle.core",
-                         "PrelIO.core",
-                         "Prelude.core",
-                         "Main.core" ] 
+       where flist =    ["PrelBase.hcr",
+                         "PrelMaybe.hcr",
+                         "PrelTup.hcr",
+                         "PrelList.hcr", 
+                         "PrelShow.hcr",
+                         "PrelEnum.hcr",
+                         "PrelNum.hcr",
+                         "PrelST.hcr",
+                         "PrelArr.hcr",
+                         "PrelDynamic.hcr",
+                         "PrelReal.hcr",
+                         "PrelFloat.hcr",
+                         "PrelRead.hcr",
+                         "PrelIOBase.hcr",
+                         "PrelException.hcr",
+                         "PrelErr.hcr",
+                         "PrelConc.hcr",
+                         "PrelPtr.hcr",
+                         "PrelByteArr.hcr",
+                         "PrelPack.hcr",
+                         "PrelBits.hcr",
+                         "PrelWord.hcr",
+                         "PrelInt.hcr",
+                         "PrelCTypes.hcr",
+                         "PrelStable.hcr",
+                         "PrelCTypesISO.hcr",
+                         "Monad.hcr",
+                         "PrelStorable.hcr",
+                         "PrelMarshalAlloc.hcr",
+                         "PrelMarshalUtils.hcr",
+                         "PrelMarshalArray.hcr",
+                         "PrelCString.hcr",
+                         "PrelMarshalError.hcr",
+                         "PrelCError.hcr",
+                         "PrelPosix.hcr",
+                         "PrelHandle.hcr",
+                         "PrelIO.hcr",
+                         "Prelude.hcr",
+                         "Main.hcr" ]