TCPREAD treats the rrMoreFlag like a longword (the size of the remaining data) rather than a Word. This overwrites rrPushFlag and returns the wrong result if the remaining data is a multiple of 65536 bytes.
1127 LDY #rrMoreFlag
1128 PLA
1129 STA [tcRESPONSEBUFFPTR],Y
1130 INY
1131 INY
1132 PLA
1133 STA [tcRESPONSEBUFFPTR],Y
^^ change to:
LDY #rrMoreFlag
PLA
ORA 1,S
STA [tcRESPONSEBUFFPTR],Y
PLA
1193 LDY #rrMoreFlag
1194 LDA :WORKLEN
1195 STA [tcRESPONSEBUFFPTR],Y
1196 INY
1197 INY
1198 LDA :WORKLEN+2
1199 STA [tcRESPONSEBUFFPTR],Y
^^ change to:
LDY #rrMoreFlag
LDA :WORKLEN
ORA :WORKLEN+2
STA [tcRESPONSEBUFFPTR],Y
Log in to post a comment.
