diff options
| author | Clyne Sullivan <clyne@bitgloo.com> | 2023-10-26 19:54:29 -0400 |
|---|---|---|
| committer | Clyne Sullivan <clyne@bitgloo.com> | 2023-10-26 19:54:29 -0400 |
| commit | 5ee8f7e01dfbcb03c705f8bb6f252c2f1b829b46 (patch) | |
| tree | 1c444cf6d11b31b8b072ca91272a0771d88f44aa /forth/core.fth | |
| parent | 6b1955a69ed1dcb218ebc33fa22c6681924dff15 (diff) | |
add .R PAD U.R U> UNUSED WITHIN
Diffstat (limited to 'forth/core.fth')
| -rw-r--r-- | forth/core.fth | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/forth/core.fth b/forth/core.fth index 360d269..a4bac26 100644 --- a/forth/core.fth +++ b/forth/core.fth @@ -8,7 +8,6 @@ : cells 2 * ; : . 0 sys ; -: u. 1 sys ; : emit 2 sys ; : 1+ 1 + ; @@ -229,3 +228,5 @@ if 7 + then 48 + hold ; : #s begin # 2dup or 0= until ; : sign 0< if [char] - hold then ; + +: u. 0 <# bl hold #s #> type ; |