mirror of
https://github.com/cc65/cc65.git
synced 2024-12-24 11:31:31 +00:00
Revert read.s
This commit is contained in:
parent
256b22f1c7
commit
8ec6d28f92
@ -8,33 +8,21 @@
|
|||||||
|
|
||||||
.include "zeropage.inc"
|
.include "zeropage.inc"
|
||||||
.include "telestrat.inc"
|
.include "telestrat.inc"
|
||||||
.include "fcntl.inc"
|
|
||||||
|
|
||||||
;int read (int fd, void* buf, unsigned count);
|
;int read (int fd, void* buf, unsigned count);
|
||||||
|
|
||||||
.proc _read
|
.proc _read
|
||||||
sta ptr1 ; count
|
sta ptr1 ; count
|
||||||
stx ptr1+1 ; count
|
stx ptr1+1 ; count
|
||||||
jsr popax ; get buf
|
jsr popax ; get buf
|
||||||
|
|
||||||
sta PTR_READ_DEST
|
sta PTR_READ_DEST
|
||||||
stx PTR_READ_DEST+1
|
stx PTR_READ_DEST+1
|
||||||
sta ptr2 ; in order to calculate nb of bytes read
|
sta ptr2 ; in order to calculate nb of bytes read
|
||||||
stx ptr2+1 ;
|
stx ptr2+1 ;
|
||||||
|
|
||||||
jsr popax ; fp pointer don't care in this version
|
; jsr popax ; fp pointer don't care in this version
|
||||||
cpx #$00
|
|
||||||
bne @is_not_stdin
|
|
||||||
cmp #STDIN_FILENO
|
|
||||||
bne @is_not_stdin
|
|
||||||
; stdin
|
|
||||||
@L1:
|
|
||||||
BRK_TELEMON XRD0 ; waits until key is pressed
|
|
||||||
bcs @L1
|
|
||||||
|
|
||||||
rts
|
|
||||||
|
|
||||||
@is_not_stdin:
|
|
||||||
lda ptr1 ;
|
lda ptr1 ;
|
||||||
ldy ptr1+1 ;
|
ldy ptr1+1 ;
|
||||||
BRK_TELEMON XFREAD ; calls telemon30 routine
|
BRK_TELEMON XFREAD ; calls telemon30 routine
|
||||||
|
Loading…
Reference in New Issue
Block a user