diff options
Diffstat (limited to 'jefs.fs')
| -rw-r--r-- | jefs.fs | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -56,7 +56,8 @@ decimal \ PNO \ mostly from pforth -255 allot variable pad + +255 allot variable pad drop variable hld : <# pad hld ! ; : hold 1 hld -! ( chr ) hld @ c! ; @@ -70,8 +71,7 @@ variable hld : u.r >r (u.) r> over - spaces say ; : (.) dup abs <# #s swap sign #> ; : . (.) say space ; +: .r >r (.) r> over - spaces say ; \ TODO something is leaking its stack (a word address i think) -15 10 u.r -t bye |
