[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