diff options
Diffstat (limited to 'compiler/parser/cutils.c')
-rw-r--r-- | compiler/parser/cutils.c | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/compiler/parser/cutils.c b/compiler/parser/cutils.c deleted file mode 100644 index fb7e3f7335..0000000000 --- a/compiler/parser/cutils.c +++ /dev/null @@ -1,24 +0,0 @@ -/* -These utility routines are used various -places in the GHC library. -*/ - -#include <Rts.h> - -#include <HsFFI.h> - -void -enableTimingStats( void ) /* called from the driver */ -{ - RtsFlags.GcFlags.giveStats = ONELINE_GC_STATS; -} - -void -setHeapSize( HsInt size ) -{ - RtsFlags.GcFlags.heapSizeSuggestion = size / BLOCK_SIZE; - if (RtsFlags.GcFlags.maxHeapSize != 0 && - RtsFlags.GcFlags.heapSizeSuggestion > RtsFlags.GcFlags.maxHeapSize) { - RtsFlags.GcFlags.maxHeapSize = RtsFlags.GcFlags.heapSizeSuggestion; - } -} |