Skip to content

Commit 8c30906

Browse files
committed
test: update zxnext tests
1 parent 2d1dbae commit 8c30906

11 files changed

Lines changed: 40 additions & 5 deletions

File tree

tests/functional/arch/zxnext/leu8.asm

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -28,12 +28,14 @@ _l:
2828
sub h
2929
ccf
3030
sbc a, a
31+
neg
3132
ld (_l), a
3233
ld a, (_level)
3334
ld hl, (_le - 1)
3435
sub h
3536
ccf
3637
sbc a, a
38+
neg
3739
ld (_l), a
3840
ld a, (_le)
3941
push af
@@ -42,6 +44,7 @@ _l:
4244
sub h
4345
ccf
4446
sbc a, a
47+
neg
4548
ld (_l), a
4649
ld a, (_le)
4750
push af
@@ -50,11 +53,13 @@ _l:
5053
sub h
5154
ccf
5255
sbc a, a
56+
neg
5357
ld (_l), a
5458
ld a, (_level)
5559
or a
5660
ccf
5761
sbc a, a
62+
neg
5863
ld (_l), a
5964
ld hl, 0
6065
ld b, h

tests/functional/arch/zxnext/ltu16.asm

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -31,6 +31,7 @@ _l:
3131
or a
3232
sbc hl, de
3333
sbc a, a
34+
neg
3435
ld l, a
3536
ld h, 0
3637
ld (_l), hl
@@ -39,6 +40,7 @@ _l:
3940
or a
4041
sbc hl, de
4142
sbc a, a
43+
neg
4244
ld l, a
4345
ld h, 0
4446
ld (_l), hl
@@ -49,6 +51,7 @@ _l:
4951
or a
5052
sbc hl, de
5153
sbc a, a
54+
neg
5255
ld l, a
5356
ld h, 0
5457
ld (_l), hl
@@ -60,6 +63,7 @@ _l:
6063
or a
6164
sbc hl, de
6265
sbc a, a
66+
neg
6367
ld l, a
6468
ld h, 0
6569
ld (_l), hl
@@ -69,6 +73,7 @@ _l:
6973
or a
7074
sbc hl, de
7175
sbc a, a
76+
neg
7277
ld l, a
7378
ld h, 0
7479
ld (_l), hl

tests/functional/arch/zxnext/ltu32.asm

Lines changed: 7 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,7 @@ _l:
3838
call .core.__SWAP32
3939
call .core.__SUB32
4040
sbc a, a
41+
neg
4142
ld l, a
4243
ld h, 0
4344
ld e, h
@@ -52,6 +53,7 @@ _l:
5253
ld de, (_level + 2)
5354
call .core.__SUB32
5455
sbc a, a
56+
neg
5557
ld l, a
5658
ld h, 0
5759
ld e, h
@@ -66,6 +68,7 @@ _l:
6668
ld de, (_level + 2)
6769
call .core.__SUB32
6870
sbc a, a
71+
neg
6972
ld l, a
7073
ld h, 0
7174
ld e, h
@@ -80,6 +83,7 @@ _l:
8083
ld de, (_level + 2)
8184
call .core.__SUB32
8285
sbc a, a
86+
neg
8387
ld l, a
8488
ld h, 0
8589
ld e, h
@@ -94,6 +98,7 @@ _l:
9498
push bc
9599
call .core.__SUB32
96100
sbc a, a
101+
neg
97102
ld l, a
98103
ld h, 0
99104
ld e, h
@@ -137,7 +142,7 @@ __SUB32:
137142
exx
138143
ret
139144
pop namespace
140-
#line 84 "arch/zxnext/ltu32.bas"
145+
#line 89 "arch/zxnext/ltu32.bas"
141146
#line 1 "/zxbasic/src/lib/arch/zxnext/runtime/swap32.asm"
142147
; Exchanges current DE HL with the
143148
; ones in the stack
@@ -155,5 +160,5 @@ __SWAP32:
155160
push bc
156161
ret
157162
pop namespace
158-
#line 85 "arch/zxnext/ltu32.bas"
163+
#line 90 "arch/zxnext/ltu32.bas"
159164
END

tests/functional/arch/zxnext/ltu8.asm

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -28,29 +28,34 @@ _l:
2828
ld a, (_le)
2929
cp h
3030
sbc a, a
31+
neg
3132
ld (_l), a
3233
ld hl, (_level - 1)
3334
ld a, (_le)
3435
cp h
3536
sbc a, a
37+
neg
3638
ld (_l), a
3739
ld a, (_le)
3840
push af
3941
ld hl, (_level - 1)
4042
pop af
4143
cp h
4244
sbc a, a
45+
neg
4346
ld (_l), a
4447
ld a, (_le)
4548
ld hl, (_level - 1)
4649
cp h
4750
sbc a, a
51+
neg
4852
ld (_l), a
4953
ld a, (_level)
5054
ld h, a
5155
xor a
5256
cp h
5357
sbc a, a
58+
neg
5459
ld (_l), a
5560
ld hl, 0
5661
ld b, h

tests/functional/arch/zxnext/nef16.asm

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -28,6 +28,7 @@ _t:
2828
call .core.__EQ32
2929
sub 1
3030
sbc a, a
31+
neg
3132
ld (0), a
3233
ld hl, 0
3334
ld b, h
@@ -65,5 +66,5 @@ __EQ32: ; Test if 32bit value HLDE equals top of the stack
6566
xor a
6667
ret
6768
pop namespace
68-
#line 23 "arch/zxnext/nef16.bas"
69+
#line 24 "arch/zxnext/nef16.bas"
6970
END

tests/functional/arch/zxnext/nei16.asm

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -25,6 +25,9 @@ _t:
2525
sbc hl, de
2626
ld a, h
2727
or l
28+
sub 1
29+
sbc a, a
30+
inc a
2831
ld (0), a
2932
ld hl, 0
3033
ld b, h

tests/functional/arch/zxnext/nei32.asm

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -28,6 +28,7 @@ _t:
2828
call .core.__EQ32
2929
sub 1
3030
sbc a, a
31+
neg
3132
ld (0), a
3233
ld hl, 0
3334
ld b, h
@@ -65,5 +66,5 @@ __EQ32: ; Test if 32bit value HLDE equals top of the stack
6566
xor a
6667
ret
6768
pop namespace
68-
#line 23 "arch/zxnext/nei32.bas"
69+
#line 24 "arch/zxnext/nei32.bas"
6970
END

tests/functional/arch/zxnext/nei8.asm

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -20,6 +20,9 @@ _t:
2020
.core.ZXBASIC_USER_DATA_END:
2121
.core.__MAIN_PROGRAM__:
2222
ld a, (_t)
23+
sub 1
24+
sbc a, a
25+
inc a
2326
ld (0), a
2427
ld hl, 0
2528
ld b, h

tests/functional/arch/zxnext/neu16.asm

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -25,6 +25,9 @@ _t:
2525
sbc hl, de
2626
ld a, h
2727
or l
28+
sub 1
29+
sbc a, a
30+
inc a
2831
ld (0), a
2932
ld hl, 0
3033
ld b, h

tests/functional/arch/zxnext/neu32.asm

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -28,6 +28,7 @@ _t:
2828
call .core.__EQ32
2929
sub 1
3030
sbc a, a
31+
neg
3132
ld (0), a
3233
ld hl, 0
3334
ld b, h
@@ -65,5 +66,5 @@ __EQ32: ; Test if 32bit value HLDE equals top of the stack
6566
xor a
6667
ret
6768
pop namespace
68-
#line 23 "arch/zxnext/neu32.bas"
69+
#line 24 "arch/zxnext/neu32.bas"
6970
END

0 commit comments

Comments
 (0)