fixed a bug

This commit is contained in:
Koichi Nakamura 2021-01-05 23:56:24 +09:00
parent 989b5e1f61
commit 514ba5d1d5

View file

@ -1883,7 +1883,7 @@ codegen-target @ s" i386-linux" str= [if]
\ overwrite code field by DFA \ overwrite code field by DFA
: ;asm : ;asm
[compile] ; \ finish compilation [compile] ; \ finish compilation
latest dup >dfa over >cfa ! latest dup >dfa swap >cfa !
; immediate ; immediate
: syscall0 ( n -- r ) : syscall0 ( n -- r )