diff options
Diffstat (limited to 'module/language/cps/cse.scm')
-rw-r--r-- | module/language/cps/cse.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/module/language/cps/cse.scm b/module/language/cps/cse.scm index a7de7a623..5d97e563b 100644 --- a/module/language/cps/cse.scm +++ b/module/language/cps/cse.scm @@ -256,6 +256,7 @@ false. It could be that both true and false proofs are available." ((scm-set!/immediate p s x) (x <- scm-ref/immediate p s)) ((word-set! p s i x) (x <- word-ref p s i)) ((word-set!/immediate p s x) (x <- word-ref/immediate p s)) + ((gc-pointer-set!/immediate p s x) (x <- gc-pointer-ref/immediate p s)) ((s <- allocate-struct #f v n) (v <- struct-vtable #f s)) ((s <- allocate-struct/immediate n v) (v <- struct-vtable #f s)) |