collapseos/292 at 4af93d53e35d95b8398de262a30b2f0d9481b77b - collapseos - SKS Gitea

izaya/collapseos

mirror of https://github.com/hsoft/collapseos.git synced 2024-12-28 23:38:05 +11: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. )