1
0
mirror of https://github.com/fadden/6502bench.git synced 2024-07-14 05:28:55 +00:00
6502bench/SourceGen/SGTestData/Expected/2009-branches-and-banks_Merlin32.S
Andy McFadden 9d5f8f8049 Add a blank line between constants and addresses
In the assembler output, add a blank line between the constants
and addresses in the long list of equates.

The earlier change that corrected the BIT instruction caused test
2009-branches-and-banks to fail, because it was relying on the idea
that BIT made the carry flag indeterminate.  Changing a BCC to a
BVS restored the desired behavior.
2019-10-22 22:45:13 -07:00

69 lines
1.2 KiB
ArmAsm

longsym equ $123456
org $1000
clc
xce
sep #$30
jmp L0000
org $0000
L0000 bit: L0000
L0003 lda L0000
lda L0003
dfb $d0,$ba
dfb $30,$b8
dfb $62,$b5,$ff
bvs L0016
brl L0080
lodat dfb $00
dfb $01
dfb $02
L0016 lda lodat+1
dfb $82,$a5,$ff
org $0080
L0080 bit: L0080
jml L440000
org $ffc0
LFFC0 bit LFFC0
LFFC3 dfb $82,$3d,$00
org $440000
L440000 cmpl L440000
L440004 ldal L440000
lda: L440000
lda L0000
bmi L440004
dfb $62,$b2,$ff
dfb $d0,$b0
dfb $82,$a9,$ff
dat44 dw dat44
adr dat44
org $44ffc0
L44FFC0 cmpl L44FFC0
high44 beq L44FFCB
dfb $30,$3c
dfb $82,$39,$00
L44FFCB jml L2000
org $2000
L2000 bit L2000
pea dat44
pea ^dat44
bne L200E
jml [lodat]
L200E nop
jsr j2
j2 jsr j2+3
jsr j2-3
jsl longsym
rts