Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2025-01-13 08:01:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Export i32%, u32%, i16%, u16%

Browse source
This commit is contained in:
Koichi Nakamura 2021-12-20 18:41:40 +09:00
parent ed61b06184
commit a245dc862c
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
bootstrap.fs
View file

@ -2710,7 +2710,8 @@ variable included-list
STRING-OVERFLOW-ERROR UNDEFINED-WORD-ERROR STRING-OVERFLOW-ERROR UNDEFINED-WORD-ERROR
exception exception
%allocate %allot char% cell% byte% ptr% int% field struct end-struct %allocate %allot char% cell% byte% ptr% int% i32% u32% i16% u16%
field struct end-struct
sp0 sp@ sp! dup ?dup drop swap over tuck pick nip rot -rot sp0 sp@ sp! dup ?dup drop swap over tuck pick nip rot -rot
2rot -2rot 2tuck 2over 2nip 2swap 2dup 2drop 3dup 3drop depth 2rot -2rot 2tuck 2over 2nip 2swap 2dup 2drop 3dup 3drop depth
rp0 rp@ rp! r> >r r@ rdrop rpick rdepth rp0 rp@ rp! r> >r r@ rdrop rpick rdepth