diff options
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/prelude/primops.txt.pp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/prelude/primops.txt.pp b/compiler/prelude/primops.txt.pp index 94de07f8e5..6a1be8a486 100644 --- a/compiler/prelude/primops.txt.pp +++ b/compiler/prelude/primops.txt.pp @@ -3208,6 +3208,13 @@ primop UnpackClosureOp "unpackClosure#" GenPrimOp with out_of_line = True +primop ClosureSizeOp "closureSize#" GenPrimOp + a -> Int# + { {\tt closureSize\# closure} returns the size of the given closure in + machine words. } + with + out_of_line = True + primop GetApStackValOp "getApStackVal#" GenPrimOp a -> Int# -> (# Int#, b #) with |