izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
1
Fork 0
Code Issues 0 Releases 0 Wiki Activity
Browse Source

zasm: make .fill support word arguments

pull/10/head
Virgil Dupras 5 years ago
parent
2efe887434
commit
3a8b5108f7
1 changed files with 7 additions and 3 deletions
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. +7
    -3
      apps/zasm/directive.asm

+ 7
- 3
apps/zasm/directive.asm View File

@@ -183,12 +183,16 @@ handleFIL:
jr nz, .badarg jr nz, .badarg
push bc push bc
push ix \ pop bc push ix \ pop bc
xor a
ld b, c
.loop: .loop:
ld a, b
or c
jr z, .loopend
xor a
call ioPutC call ioPutC
jr nz, .ioError jr nz, .ioError
djnz .loop
dec bc
jr .loop
.loopend:
cp a ; ensure Z cp a ; ensure Z
pop bc pop bc
ret ret


Write Preview
Loading…
Cancel
Save