6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-03-03 09:32:33 +00:00
Code Issues Projects Releases Wiki Activity

Merge pull request #2124 from jedeoric/telestrat_fix_compute_length_bytes_read_write

Browse Source 
Fix computed length for read and write for telestrat target
This commit is contained in:
Bob Andrews 2023-05-29 16:02:41 +02:00 committed by GitHub
commit 31bac03d01
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
libsrc/telestrat/read.s
View File

@ -30,13 +30,14 @@
ldy ptr1+1
BRK_TELEMON XFREAD
; compute nb of bytes read
lda PTR_READ_DEST+1
sec
lda PTR_READ_DEST
sbc ptr2
pha
lda PTR_READ_DEST+1
sbc ptr2+1
tax
lda PTR_READ_DEST
sec
sbc ptr2
; here A and X contains number of bytes read
pla
rts
.endproc

12
libsrc/telestrat/write.s
View File

@ -42,16 +42,16 @@ next:
ldy ptr3+1
ldx tmp1 ; send fd in X
BRK_TELEMON XFWRITE
; compute nb of bytes written
lda PTR_READ_DEST+1
sec
lda PTR_READ_DEST
sbc ptr1
pha
lda PTR_READ_DEST+1
sbc ptr1+1
tax
lda PTR_READ_DEST
sec
sbc ptr1
pla
rts