diff options
| author | kitty <nepeta@canaglie.net> | 2026-02-27 13:35:21 +1100 |
|---|---|---|
| committer | kitty <nepeta@canaglie.net> | 2026-02-27 13:35:21 +1100 |
| commit | 18223b231d698ebe293b0018ed0bdad34961afa4 (patch) | |
| tree | 502eaf08adca4a4d960e99f24b68588a42638521 | |
| parent | 246f0e1948c2dbc97965820bc2367d2cef704ed5 (diff) | |
MAKE - it's like create but for arrays and stuff
my create works in a way that makes stuff like
`create DATA 8 cells allot` will not work correctly.
so i chose a synonym for `create` that works in the correct way.
| -rw-r--r-- | jefs.fs | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -33,6 +33,9 @@ hex : ret, c3 c, ; decimal : literal [compile] lit ; immediate : constant create [compile] lit ret, ; : variable 1 cells allot create [compile] lit ret, ; +\ maybe i made bad design decisions, this is CREATE but it pushes a pointer to just after its definition. for arrays and the like +\ does not use LIT because we want to fill it in After +: make create here @ 18 + [compile] lit ret, ; \ FLOW CONTROL {{{ \ jump helpers from forth83 (got them from pforth tho ehehe) |
