diff options
author | Sergei Trofimovich <siarheit@google.com> | 2015-12-30 12:35:53 +0000 |
---|---|---|
committer | Sergei Trofimovich <siarheit@google.com> | 2015-12-30 13:49:14 +0000 |
commit | e9ab6d5939014e11b4f9368984f991de4d4cf041 (patch) | |
tree | 5d8ca35098e980fa80003ed544602a0f1b9f367a /rts/PrimOps.cmm | |
parent | b0fa286475e5251e6b92e83da3716f9ca9ed37b6 (diff) | |
download | haskell-e9ab6d5939014e11b4f9368984f991de4d4cf041.tar.gz |
rts/PrimOps.cmm: fix UNREG profiled build
Brought 'CCS_MAIN' into scope, otherwise UNREG
prof build is unhappy:
rts_dist_HC rts/dist/build/PrimOps.p_o
/tmp/ghc25593_0/ghc_3.hc: In function 'clB_entry':
/tmp/ghc25593_0/ghc_3.hc:2983:24: error:
error: 'CCS_MAIN' undeclared (first use in this function)
*((P_)(_cly+8)) = (W_)&CCS_MAIN;
^
Signed-off-by: Sergei Trofimovich <siarheit@google.com>
Diffstat (limited to 'rts/PrimOps.cmm')
-rw-r--r-- | rts/PrimOps.cmm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm index 2989f29462..7add8357ca 100644 --- a/rts/PrimOps.cmm +++ b/rts/PrimOps.cmm @@ -35,6 +35,9 @@ import CLOSURE ghczmprim_GHCziTypes_False_closure; #if defined(USE_MINIINTERPRETER) || !defined(mingw32_HOST_OS) import CLOSURE sm_mutex; #endif +#ifdef PROFILING +import CLOSURE CCS_MAIN; +#endif /*----------------------------------------------------------------------------- Array Primitives |