diff options
Diffstat (limited to 'ghc/includes/SMcompact.lh')
| -rw-r--r-- | ghc/includes/SMcompact.lh | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/ghc/includes/SMcompact.lh b/ghc/includes/SMcompact.lh index cb47a4513a..9fb25d819b 100644 --- a/ghc/includes/SMcompact.lh +++ b/ghc/includes/SMcompact.lh @@ -49,6 +49,9 @@ if it's not static. typedef I_ (StgScanFun)(STG_NO_ARGS); typedef I_ (*StgScanPtr)(STG_NO_ARGS); +#ifdef TICKY_TICKY +extern StgScanFun _ScanLink_0_0; +#endif extern StgScanFun _ScanLink_1_0; extern StgScanFun _ScanLink_2_0; extern StgScanFun _ScanLink_3_0; @@ -78,7 +81,7 @@ extern StgScanFun _ScanLink_Tuple; extern StgScanFun _ScanLink_Data; extern StgScanFun _ScanLink_MuTuple; -#ifdef USE_COST_CENTRES +#if defined(PROFILING) || defined(TICKY_TICKY) extern StgScanFun _ScanLink_PI; #endif @@ -128,6 +131,9 @@ extern StgScanFun _ScanLink_TSO; extern StgScanFun _ScanLink_BQ; #endif +#ifdef TICKY_TICKY +extern StgScanFun _ScanMove_0; +#endif extern StgScanFun _ScanMove_1; extern StgScanFun _ScanMove_2; extern StgScanFun _ScanMove_3; @@ -147,7 +153,7 @@ extern StgScanFun _ScanMove_Tuple; extern StgScanFun _ScanMove_Data; extern StgScanFun _ScanMove_MuTuple; -#ifdef USE_COST_CENTRES +#if defined(PROFILING) || defined(TICKY_TICKY) extern StgScanFun _ScanMove_PI; #endif |