diff options
| author | Ian Lynagh <igloo@earth.li> | 2007-04-06 00:11:37 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2007-04-06 00:11:37 +0000 |
| commit | 317fc69d18eda68fd65f5ba634feafbe4a3923da (patch) | |
| tree | f74410483a691cd8c1f2e5d5e4f319ada585dc60 /compiler/parser/cutils.c | |
| parent | 0d126b9c0dc9299a860fc6bb0e1dee05eb583de2 (diff) | |
| download | haskell-317fc69d18eda68fd65f5ba634feafbe4a3923da.tar.gz | |
Remove code that is dead, as we require __GLASGOW_HASKELL__ >= 504
Diffstat (limited to 'compiler/parser/cutils.c')
| -rw-r--r-- | compiler/parser/cutils.c | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/compiler/parser/cutils.c b/compiler/parser/cutils.c index 08832f298d..4a7b7b3c68 100644 --- a/compiler/parser/cutils.c +++ b/compiler/parser/cutils.c @@ -3,19 +3,8 @@ These utility routines are used various places in the GHC library. */ -/* For GHC 4.08, we are relying on the fact that RtsFlags has - * compatible layout with the current version, because we're - * #including the current version of RtsFlags.h below. 4.08 didn't - * ship with its own RtsFlags.h, unfortunately. For later GHC - * versions, we #include the correct RtsFlags.h. - */ -#if __GLASGOW_HASKELL__ < 502 -#include "../includes/Rts.h" -#include "../includes/RtsFlags.h" -#else #include "Rts.h" #include "RtsFlags.h" -#endif #include "HsFFI.h" @@ -51,10 +40,7 @@ ghc_memcmp_off( HsAddr a1, HsInt i, HsAddr a2, HsInt len ) void enableTimingStats( void ) /* called from the driver */ { -#if __GLASGOW_HASKELL__ >= 411 RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; -#endif - /* ignored when bootstrapping with an older GHC */ } void |