1
0
mirror of https://github.com/fadden/6502bench.git synced 2024-07-04 01:29:34 +00:00
6502bench/SourceGen/SGTestData/Expected/10032-flags-and-branches_Merlin32.S
Andy McFadden 3ff0fbae34 Regression test rework, part 1
The regression tests were written with the assumption that all cross
assemblers would support 6502, 65C02, and 65816 code.  There are a
few that support 65816 partially (e.g. ACME) or not at all.  To best
support these, we need to split some of the tests into pieces, so
that important 6502 tests aren't skipped simply because parts of the
test also exercise 65816 code.

The first step is to change the regression test naming scheme.  The
old system used 1xxx for tests without project files, and 2xxx for
tests with project files.  The new system uses 1xxxN / 2xxxN, where
N indicates the CPU type: 0 for 6502, 1 for 65C02, and 2 for 65816.
For the 1xxxN tests the new value determines which CPU is used,
which allows us to move the "allops" 6502/65C02 tests into the
no-project category.  For 2xxxN it just allows the 6502 and 65816
versions to have the same base name and number.

This change updates the first batch of tests.  It involves minor
changes to the test harness and a whole bunch of renaming.
2020-06-06 14:47:19 -07:00

280 lines
4.2 KiB
ArmAsm

org $1000
clc
xce
sep #$ff
clv
cld
cli
clc
lda #$80
lda #$01
sed
sei
sec
lda #$ff
adc #$00
sep #$ff
rep #$80
rep #$40
rep #$20
mx %01
rep #$10
mx %00
rep #$08
rep #$04
rep #$02
rep #$01
sep #$00
sep #$ff
mx %11
rep #$00
rep #$ff
mx %00
lda #$feed
sec
xce
mx %11
lda #$ff
rep #$30
mx %11
lda #$ff
clc
xce
lda #$ff
rep #$20
mx %01
sep #$10
lda #$0000
ldx #$01
ldy #$02
sep #$20
mx %11
rep #$10
mx %10
lda #$01
ldx #$0000
ldy #$0000
sep #$30
mx %11
lda #$00
pha
plp
rep #$80
bpl L105F
dfb $00
dfb $00
L105F sep #$80
bpl :L1065
bmi :L1067
:L1065 dfb $00
dfb $00
:L1067 rep #$40
bvc :L106D
dfb $00
dfb $00
:L106D sep #$40
bvs :L1073
dfb $00
dfb $00
:L1073 rep #$01
bcc :L1079
dfb $00
dfb $00
:L1079 sep #$01
bcs :L107F
dfb $00
dfb $00
:L107F rep #$02
bne :L1085
dfb $00
dfb $00
:L1085 sep #$02
beq :L108B
dfb $00
dfb $00
:L108B sep #$ff
lda #$01
bne :L1093
dfb $00
dfb $db
:L1093 lda #$00
beq :L1099
dfb $00
dfb $db
:L1099 bpl :L109D
dfb $00
dfb $db
:L109D lda #$80
bmi :L10A3
dfb $00
dfb $db
:L10A3 lda #$ff
and #$00
beq :L10AB
dfb $00
dfb $db
:L10AB lda #$00
ldx #$80
and #$ff
beq :L10B5
bne :L10B5
:L10B5 lda #$ff
ldx #$00
and #$7f
beq :L10BF
bne :L10BF
:L10BF bpl :L10C3
dfb $00
dfb $db
:L10C3 lda #$ff
and #$80
bmi :L10CB
brk
dfb $db
:L10CB lda #$00
ldx #$80
bne :L10D3
dfb $00
dfb $db
:L10D3 ora #$00
beq :L10D9
bne :L10D9
:L10D9 ora #$01
bne :L10DF
dfb $00
dfb $db
:L10DF lda #$00
ldx #$80
bmi :L10E7
dfb $00
dfb $db
:L10E7 ora #$7f
bpl :L10EF
bmi :L10EF
dfb $00
dfb $db
:L10EF ora #$80
bmi :L10F5
dfb $00
dfb $db
:L10F5 lda :L10F5
sec
ror A
bmi :L10FE
dfb $00
dfb $dc
:L10FE clc
ror A
bpl :L1104
dfb $00
dfb $dc
:L1104 lda #$00
sec
rol A
bne :L110C
dfb $00
dfb $dc
:L110C lda #$ff
lsr A
bpl :L1113
dfb $00
dfb $dd
:L1113 clc
php
sec
plp
bcc :L111B
dfb $00
dfb $00
:L111B sec
bcs :L111F
:L111E clc
:L111F lda $33
beq :L111E
bcs :L1127
lda $44
:L1127 nop
rep #$20
mx %01
sep #$10
jsr :L1143
rep #$30
mx %00
jsr :L1149
sep #$30
mx %11
jsr :L1149
rep #$20
mx %01
sep #$10
jsr :L1143
sep #$30
mx %11
rts
mx %01
:L1143 lda #$1234
ldx #$ff
rts
mx %11
:L1149 lda #$ff
ldx #$ee
ldy #$dd
rts