collapseos/292 at c26c454cbfe5fd3e2bba1f455eda2f9761669f3e - collapseos - SKS Gitea

izaya/collapseos

mirror of https://github.com/hsoft/collapseos.git synced 2024-09-16 09:48:46 +10:00

Virgil Dupras 2d17b4e8ec Make string length-prefixed instead of null-terminated

I'm not sure why I chose null-terminated initially. Probably because
the z80asm version had null-terminated strings.

Length-prefixes strings are the traditional form of strings in Forth
and it's a bit easier to work with them with traditional forth words
when they're under this form.

2020-05-25 20:34:52 -04:00

9 lines

318 B

Plaintext

Raw Blame History

     BEGIN, ( inner )
     ( DE is a wordref, first step, do our len correspond? )
         HL PUSHqq,          ( --> lvl 1 )
         DE PUSHqq,          ( --> lvl 2 )
         DE DECss,
         LDA(DE),
 x7f ANDn,          ( remove IMMEDIATE flag )
         C CPr,                                        ( cont. )