Add a new primop: getCCCS# :: State# s -> (# State# s, Addr# #)
authorSimon Marlow <marlowsd@gmail.com>
Tue, 29 Nov 2011 14:05:17 +0000 (14:05 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Tue, 29 Nov 2011 14:22:28 +0000 (14:22 +0000)
commit1f7433b7b998dda4dde6d09f22a37f637745c079
treea19c5247c1d7a4816afc8fbe7d15374209c39e6c
parent1ed0dfa1fe8d50ece73ee9872aa045998ef6f0f5
Add a new primop: getCCCS# :: State# s -> (# State# s, Addr# #)

Returns a pointer to the current cost-centre stack when profiling,
NULL otherwise.
compiler/codeGen/CgPrimOp.hs
compiler/codeGen/StgCmmPrim.hs
compiler/prelude/primops.txt.pp
rts/Capability.c