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

On branch  : master

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

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

commit b7dd4b5dbb658d7785f9a28c566be751173a2680
Author: Ian Lynagh <[email protected]>
Date:   Fri Sep 14 15:25:16 2012 +0100

    MAX_REAL_LONG_REG is always defined, so no need to test it

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

 includes/mkDerivedConstants.c |    8 +-------
 1 files changed, 1 insertions(+), 7 deletions(-)

diff --git a/includes/mkDerivedConstants.c b/includes/mkDerivedConstants.c
index 6246a29..5b71a1b 100644
--- a/includes/mkDerivedConstants.c
+++ b/includes/mkDerivedConstants.c
@@ -660,13 +660,7 @@ main(int argc, char *argv[])
     constantInt("mAX_Real_Vanilla_REG", MAX_REAL_VANILLA_REG);
     constantInt("mAX_Real_Float_REG",   MAX_REAL_FLOAT_REG);
     constantInt("mAX_Real_Double_REG",  MAX_REAL_DOUBLE_REG);
-    constantInt("mAX_Real_Long_REG",
-#ifdef MAX_REAL_LONG_REG
-                                        MAX_REAL_LONG_REG
-#else
-                                        0
-#endif
-                                        );
+    constantInt("mAX_Real_Long_REG",    MAX_REAL_LONG_REG);
 
     switch (mode) {
     case Gen_Haskell_Type:



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to