diff options
| author | Mirek Kratochvil <exa.exa@gmail.com> | 2023-11-03 21:28:40 +0100 |
|---|---|---|
| committer | Mirek Kratochvil <exa.exa@gmail.com> | 2023-11-03 21:28:40 +0100 |
| commit | d7fcbcdbf0dd3976ea26800a28508785d02c2408 (patch) | |
| tree | d2720d0045110b3520749be8272c76844583e1b6 /include/primops.s | |
| parent | 1909e97d4615045e707710a2aaeae8bf702a8355 (diff) | |
| download | uskel-d7fcbcdbf0dd3976ea26800a28508785d02c2408.tar.gz uskel-d7fcbcdbf0dd3976ea26800a28508785d02c2408.tar.bz2 | |
fix blackhole (partially), kill apply1
Diffstat (limited to 'include/primops.s')
| -rw-r--r-- | include/primops.s | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/include/primops.s b/include/primops.s index 117bcca..5f26307 100644 --- a/include/primops.s +++ b/include/primops.s @@ -12,6 +12,7 @@ _primops_s_file: needs_alloc $040 # push a thunk for collecting the first arg and set it as continuation thunkto %rsi, $\name\()_fini, $2, %rbp, %rsi + blackhole enter 020(%rbp) # evaluate arg1 # arg1 -> | ret | cont | @@ -43,6 +44,7 @@ _primops_s_file: 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 + blackhole enter 020(%rbp) # evaluate arg1 # arg1 -> | arg2 | ret | cont | |