Skip to content

Commit a1146f4

Browse files
committed
Update tests
1 parent 2b93838 commit a1146f4

1 file changed

Lines changed: 25 additions & 7 deletions

File tree

tests/functional/arch/zx48k/print42.asm

Lines changed: 25 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -73,6 +73,10 @@ _print42:
7373
LOCAL examineChar
7474
examineChar:
7575
LD A,(HL)
76+
CP 165
77+
JR NC, nextChar
78+
CP 144
79+
JR NC, prn
7680
CP 128
7781
JR NC, nextChar
7882
CP 22
@@ -144,6 +148,8 @@ printachar:
144148
EXX
145149
PUSH HL
146150
EXX
151+
CP 144
152+
jr nc,printudg
147153
ld c, a
148154
ld h, 0
149155
ld l, a
@@ -158,6 +164,18 @@ printachar:
158164
ld b, h
159165
ld c, l
160166
jr printdata
167+
LOCAL printudg
168+
printudg
169+
sub 144
170+
ld hl,$5C7B
171+
ld e,(hl)
172+
inc hl
173+
ld d,(hl)
174+
ld l,a
175+
call mult8
176+
ld b, h
177+
ld c, l
178+
jr printdata
161179
LOCAL calcChar
162180
calcChar:
163181
ld de, 15360
@@ -315,9 +333,9 @@ ycoord:
315333
ret c
316334
ld d, 0
317335
ret
318-
#line 329 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
336+
#line 351 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
319337
.LABEL._printAt42Coords:
320-
#line 330 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
338+
#line 352 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
321339
LOCAL xycoords
322340
xycoords:
323341
defb 0
@@ -491,7 +509,7 @@ characters:
491509
LOCAL print42end
492510
print42end:
493511
ENDP
494-
#line 522 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
512+
#line 544 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
495513
_print42__leave:
496514
ex af, af'
497515
exx
@@ -508,7 +526,7 @@ _print42__leave:
508526
exx
509527
ret
510528
;; --- end of user code ---
511-
#line 1 "/zxbasic/src/lib/arch/zx48k/runtime/free.asm"
529+
#line 1 "/zxbasic/src/lib/arch/zx48k/runtime/mem/free.asm"
512530
; vim: ts=4:et:sw=4:
513531
; Copyleft (K) by Jose M. Rodriguez de la Rosa
514532
; (a.k.a. Boriel)
@@ -568,7 +586,7 @@ _print42__leave:
568586
; HL = BLOCK Start & DE = Length.
569587
; An init directive is useful for initialization routines.
570588
; They will be added automatically if needed.
571-
#line 1 "/zxbasic/src/lib/arch/zx48k/runtime/heapinit.asm"
589+
#line 1 "/zxbasic/src/lib/arch/zx48k/runtime/mem/heapinit.asm"
572590
; vim: ts=4:et:sw=4:
573591
; Copyleft (K) by Jose M. Rodriguez de la Rosa
574592
; (a.k.a. Boriel)
@@ -675,7 +693,7 @@ __MEM_INIT2:
675693
ret
676694
ENDP
677695
pop namespace
678-
#line 69 "/zxbasic/src/lib/arch/zx48k/runtime/free.asm"
696+
#line 69 "/zxbasic/src/lib/arch/zx48k/runtime/mem/free.asm"
679697
; ---------------------------------------------------------------------
680698
; MEM_FREE
681699
; Frees a block of memory
@@ -774,5 +792,5 @@ __MEM_BLOCK_JOIN: ; Joins current block (pointed by HL) with next one (pointed
774792
ret
775793
ENDP
776794
pop namespace
777-
#line 540 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
795+
#line 562 "/zxbasic/src/lib/arch/zx48k/stdlib/print42.bas"
778796
END

0 commit comments

Comments
 (0)