aboutsummaryrefslogtreecommitdiff
path: root/include/primops.s
diff options
context:
space:
mode:
authorMirek Kratochvil <exa.exa@gmail.com>2023-10-31 00:12:51 +0100
committerMirek Kratochvil <exa.exa@gmail.com>2023-10-31 00:12:51 +0100
commit2bc3d9a3815a6cd172b3b4f7696c46a006021b13 (patch)
treebd77783f22f010976af6176336bfc4977987eac7 /include/primops.s
parent8504d72bda94c3a1668ebbdd262ae8a4963a23c1 (diff)
downloaduskel-2bc3d9a3815a6cd172b3b4f7696c46a006021b13.tar.gz
uskel-2bc3d9a3815a6cd172b3b4f7696c46a006021b13.tar.bz2
gc kinda almost there
Diffstat (limited to 'include/primops.s')
-rw-r--r--include/primops.s2
1 files changed, 2 insertions, 0 deletions
diff --git a/include/primops.s b/include/primops.s
index f532144..117bcca 100644
--- a/include/primops.s
+++ b/include/primops.s
@@ -9,6 +9,7 @@ _primops_s_file:
.macro .primop1 name
# | arg1 | -> cont
.thunkcode \name
+ needs_alloc $040
# push a thunk for collecting the first arg and set it as continuation
thunkto %rsi, $\name\()_fini, $2, %rbp, %rsi
enter 020(%rbp) # evaluate arg1
@@ -39,6 +40,7 @@ _primops_s_file:
.macro .primop2 name
# | arg1 | arg2 | -> cont
.thunkcode \name
+ needs_alloc $050
# push a thunk for collecting the first arg and set it as continuation
thunkto %rsi, $\name\()_step1, $3, 030(%rbp), %rbp, %rsi
enter 020(%rbp) # evaluate arg1