[commit: ghc] master: rts/PrimOps.cmm: fix UNREG profiled build (e9ab6d5)
git at git.haskell.org
git at git.haskell.org
Wed Dec 30 14:23:07 UTC 2015
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/e9ab6d5939014e11b4f9368984f991de4d4cf041/ghc
>---------------------------------------------------------------
commit e9ab6d5939014e11b4f9368984f991de4d4cf041
Author: Sergei Trofimovich <siarheit at google.com>
Date: Wed Dec 30 12:35:53 2015 +0000
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 at google.com>
>---------------------------------------------------------------
e9ab6d5939014e11b4f9368984f991de4d4cf041
rts/PrimOps.cmm | 3 +++
1 file changed, 3 insertions(+)
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm
index 2989f29..7add835 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
More information about the ghc-commits
mailing list