[commit: ghc] master: Split the PlatformConstants type off into its own module (f52b4ad)

Ian Lynagh igloo at earth.li
Sat Feb 9 00:34:09 CET 2013


Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/f52b4ad90f940bdb1e8719fbbc395450d2131a8a

>---------------------------------------------------------------

commit f52b4ad90f940bdb1e8719fbbc395450d2131a8a
Author: Ian Lynagh <ian at well-typed.com>
Date:   Fri Feb 8 22:01:03 2013 +0000

    Split the PlatformConstants type off into its own module

>---------------------------------------------------------------

 compiler/ghc.cabal.in              |    1 +
 compiler/main/DynFlags.hs          |    2 +-
 compiler/main/PlatformConstants.hs |   12 ++++++++++++
 3 files changed, 14 insertions(+), 1 deletions(-)

diff --git a/compiler/ghc.cabal.in b/compiler/ghc.cabal.in
index e5d9fd9..a69e25e 100644
--- a/compiler/ghc.cabal.in
+++ b/compiler/ghc.cabal.in
@@ -289,6 +289,7 @@ Library
         InteractiveEval
         PackageConfig
         Packages
+        PlatformConstants
         PprTyThing
         StaticFlags
         SysTools
diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index dcabb8f..52eed21 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -132,6 +132,7 @@ module DynFlags (
 #include "HsVersions.h"
 
 import Platform
+import PlatformConstants
 import Module
 import PackageConfig
 import {-# SOURCE #-} PrelNames ( mAIN )
@@ -3333,7 +3334,6 @@ compilerInfo dflags
        ("Global Package DB",           systemPackageConfig dflags)
       ]
 
-#include "../includes/dist-derivedconstants/header/GHCConstantsHaskellType.hs"
 #include "../includes/dist-derivedconstants/header/GHCConstantsHaskellWrappers.hs"
 
 bLOCK_SIZE_W :: DynFlags -> Int
diff --git a/compiler/main/PlatformConstants.hs b/compiler/main/PlatformConstants.hs
new file mode 100644
index 0000000..03e146c
--- /dev/null
+++ b/compiler/main/PlatformConstants.hs
@@ -0,0 +1,12 @@
+-------------------------------------------------------------------------------
+--
+-- | Platform constants
+--
+-- (c) The University of Glasgow 2013
+--
+-------------------------------------------------------------------------------
+
+module PlatformConstants (PlatformConstants(..)) where
+
+#include "../includes/dist-derivedconstants/header/GHCConstantsHaskellType.hs"
+





More information about the ghc-commits mailing list