mirror of
https://github.com/byteworksinc/ORCALib.git
synced 2025-04-13 07:37:09 +00:00
Clear the EOF flag on successful calls to ungetc().
This is specified by the C standards.
This commit is contained in:
parent
38666ee111
commit
1f88a38e2e
@ -3194,8 +3194,11 @@ char equ 1 character to return
|
||||
and #$00FF
|
||||
sta [stream],Y
|
||||
sta char
|
||||
rts long M
|
||||
creturn 2:char
|
||||
ldy #FILE_flag clear the EOF flag
|
||||
lda [stream],Y
|
||||
and #$FFFF-_IOEOF
|
||||
sta [stream],Y
|
||||
rts creturn 2:char
|
||||
end
|
||||
|
||||
****************************************************************
|
||||
|
Loading…
x
Reference in New Issue
Block a user