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

Add i32%, u32%, i16%, u16%

Browse source
This commit is contained in:
Koichi Nakamura 2021-12-20 17:46:16 +09:00
parent 67c4b25adc
commit 82334990a3
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
bootstrap.fs
View file

@ -1668,9 +1668,13 @@ do-stack 16 cells + do-sp !
: cell% ( -- align size ) cell cell ; : cell% ( -- align size ) cell cell ;
: char% ( -- align size ) 1 1 ; : char% ( -- align size ) 1 1 ;
: byte% cell% ; : byte% 1 1 ;
: ptr% cell% ; : ptr% cell% ;
: int% cell% ; : int% cell% ;
: i32% 4 4 ;
: u32% 4 4 ;
: i16% 2 2 ;
: u16% 2 2 ;
\ allocate user memory \ allocate user memory
: %allot ( align size -- addr ) : %allot ( align size -- addr )