From 011e79dbc937e4fae4388fc50252db0d0224fdbf Mon Sep 17 00:00:00 2001 From: Koichi Nakamura Date: Sun, 10 Jan 2021 10:47:19 +0900 Subject: [PATCH] Add byte% ptr% int% --- bootstrap.fs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/bootstrap.fs b/bootstrap.fs index 11d0dd7..1150965 100644 --- a/bootstrap.fs +++ b/bootstrap.fs @@ -1492,6 +1492,9 @@ do-stack 16 cells + do-sp ! : cell% ( -- align size ) cell cell ; : char% ( -- align size ) 1 1 ; +: byte% cell% ; +: ptr% cell% ; +: int% cell% ; \ allocate user memory : %allot ( align size -- addr )