|
- ; Is (HL) a double-quoted string? If yes, spit what's inside and place (HL)
- ; at char after the closing quote.
- ; Set Z if there was a string, unset otherwise.
- spitQuoted:
- ld a, (hl)
- cp '"'
- ret nz
- inc hl
- .loop:
- ld a, (hl)
- inc hl
- cp '"'
- ret z
- or a
- ret z
- call stdioPutC
- jr .loop
-
- ; Same as spitQuoted, but without the spitting
- skipQuoted:
- ld a, (hl)
- cp '"'
- ret nz
- inc hl
- .loop:
- ld a, (hl)
- inc hl
- cp '"'
- ret z
- or a
- ret z
- jr .loop
|