diff options
| author | kitty <nepeta@canaglie.net> | 2026-02-21 00:36:47 +1100 |
|---|---|---|
| committer | kitty <nepeta@canaglie.net> | 2026-02-21 00:36:47 +1100 |
| commit | d5757bd85c97dafd245875ea9216f4f35a5d9790 (patch) | |
| tree | aac0787e4bc92ac22cd23b3d88fa89abe74de193 /jefs.s | |
| parent | 13b631bfde1c9e488b1827282fd9968371679472 (diff) | |
u.r, fix r> >r
Diffstat (limited to 'jefs.s')
| -rw-r--r-- | jefs.s | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -700,13 +700,17 @@ defword "-rot", dash_rot, 0 ret defword "r>", from_r, 0 + pop r12 ; keep return address pop r11 pspush r11 + push r12 ret defword ">r", to_r, 0 + pop r12 ; ret addr pspop r11 push r11 + push r12 ret defword "drop", drop, 0 @@ -719,7 +723,9 @@ defword "2drop", twodrop, 0 ret defword "rdrop", rdrop, 0 + pop r12 ; ret addr pop r11 + push r12 ret ; not sure if this is the right place to put this but |