diff options
| -rw-r--r-- | jefs.fs | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -17,6 +17,7 @@ decimal : [compile] parse find drop >cfa compile, ; immediate : ' parse find drop >cfa [compile] lit ; immediate \ note: no error handling (yet) : constant create [compile] lit ret, ; +: variable 1 cells allot create [compile] lit ret, ; : begin here @ ; immediate : again branch here @ 4 + - d, ; immediate \ add 4 to get to beginning of the next instruction |
