Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-02-16 22:30:46 +00:00
Code Issues Projects Releases Wiki Activity

assem optimize 4 letter mnems for size

Browse Source
This commit is contained in:
Irmen de Jong 2021-01-03 02:17:10 +01:00
parent f0930d8a18
commit 3e7c7ab497
2 changed files with 42 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/assembler/assem.p8
View File

@ -24,8 +24,8 @@ main {
}
txt.chrout('\n')
;user_input()
benchmark()
user_input()
;benchmark()
; test_stack.test()
}

53
examples/assembler/gen_opcodes.py
View File

@ -519,19 +519,11 @@ for first in tree:
for third in tree[first][second]:
print(" cpy #'%s'" % third)
print(" bne _not_%s%s%s" % (first, second, third))
if tree[first][second][third]:
# TODO OPTIMIZE CODE FOR THE FOUR LETTER MNEMONICS (the fourth letter is always a digit 0-9)
for fourth in tree[first][second][third]:
print(" pha")
print(" lda _opcode_fourth_letter")
print(" cmp #'%s'" % fourth)
print(" bne _not_%s%s%s%s" % (first, second, third, fourth))
print(" pla")
print(" lda #<i_%s%s%s%s" % (first, second, third, fourth))
print(" ldy #>i_%s%s%s%s" % (first, second, third, fourth))
print(" rts")
print("_not_%s%s%s%s:" % (first, second, third, fourth))
print(" pla")
fourth = tree[first][second][third]
if fourth:
if "".join(fourth.keys()) != "01234567":
raise ValueError("fourth", fourth.keys())
print(" bra _check_%s%s%s" % (first, second, third))
else:
print(" lda #<i_%s%s%s" % (first, second, third))
print(" ldy #>i_%s%s%s" % (first, second, third))
@ -539,7 +531,42 @@ for first in tree:
print("_not_%s%s%s:" % (first, second, third))
print("_not_%s%s:" % (first, second))
print("_not_%s:" % first)
print("_invalid:")
print(" lda #0")
print(" ldy #0")
print(" rts")
# the 4-letter mnemonics are:
# smb[0-7]
# bbr[0-7]
# rmb[0-7]
# bbs[0-7]
for fourlettermnemonic in ["smb", "bbr", "rmb", "bbs"]:
print("_check_%s" % fourlettermnemonic)
print(" lda #<_tab_%s" % fourlettermnemonic)
print(" ldy #>_tab_%s" % fourlettermnemonic)
print(""" sta P8ZP_SCRATCH_W2
sty P8ZP_SCRATCH_W2+1
bra _check4""")
print("""_check4
lda _opcode_fourth_letter
cmp #'0'
bcc _invalid
cmp #'8'
bcs _invalid
ldy #0
lda (P8ZP_SCRATCH_W2),y
pha
iny
lda (P8ZP_SCRATCH_W2),y
tay
pla
rts""")
for fourlettermnemonic in ["smb", "bbr", "rmb", "bbs"]:
print("_tab_%s" % fourlettermnemonic)
for ii in "01234567":
print(" .word i_%s%s" % (fourlettermnemonic, ii))
print(" .pend")