izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 12:08:07 +11:00
Code Issues Releases Wiki Activity

zasm: allow blank lines in asm source code

Browse Source
This commit is contained in:
Virgil Dupras 2019-04-30 16:24:45 -04:00
parent eb5c974573
commit a7635cb1ea
3 changed files with 17 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
apps/zasm/main.asm
View File

@ -24,6 +24,7 @@ main:
; to where we should write the next upcode. ; to where we should write the next upcode.
parseLine: parseLine:
push bc push bc
call gotoNextNotBlankLine
call tokenize call tokenize
jr nz, .error jr nz, .error
call parseTokens call parseTokens

6
apps/zasm/tests/test1.asm
View File

@ -1,2 +1,4 @@
add a, b ; comment
inc a add a, b ; comment
inc a ; comment
; comment

12
apps/zasm/tok.asm
View File

@ -144,6 +144,18 @@ gotoNextLine:
call JUMP_UNSETZ call JUMP_UNSETZ
ret ret
; Repeatedly calls gotoNextLine until the line in (HL) points to a line that
; isn't blank or 100% comment. Sets Z if we reach a line, Unset Z if we reach
; EOF
gotoNextNotBlankLine:
call toWord
ret z ; Z set? we have a not-blank line
; Z not set? (HL) is at the end of the line or at the beginning of
; comments.
call gotoNextLine
ret nz
jr gotoNextNotBlankLine
; *** Variables *** ; *** Variables ***
tokInstr: tokInstr: