1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 06:31:31 +00:00

small optimzation (found by Greg King)

This commit is contained in:
Christian Groessler 2013-12-07 01:24:05 +01:00
parent 2461163f38
commit 9e91f74297

View File

@ -562,8 +562,9 @@ found: lda ptr3
lda #40 ; XIO 40, start concurrent IO lda #40 ; XIO 40, start concurrent IO
sta ICCOM,x sta ICCOM,x
sta cm_run ; indicate concurrent mode is running sta cm_run ; indicate concurrent mode is running
lda #$0D ; value from 850 manual, p62. must be $0D?,
sta ICAX1,x ; or any non-zero?
lda #0 lda #0
sta ICAX1,x
sta ICAX2,x sta ICAX2,x
lda #<recv_buf lda #<recv_buf
sta ICBAL,x sta ICBAL,x
@ -573,8 +574,6 @@ found: lda ptr3
sta ICBLL,x sta ICBLL,x
lda #>RECVBUF_SZ lda #>RECVBUF_SZ
sta ICBLH,x sta ICBLH,x
lda #$0D ; value from 850 man, p62. must be $0D?,
sta ICAX1,x ; or any non-zero?
jmp my_CIOV jmp my_CIOV
.endproc ;ena_cm .endproc ;ena_cm