6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-08 06:25:17 +00:00
Code Issues Projects Releases Wiki Activity

some fixes

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@4829 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cpg
2010-10-28 21:02:09 +00:00
parent 1aeb5651f5
commit 03ed1b3a6a
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
libsrc/atari/posixdirent.s
View File

@@ -41,7 +41,7 @@ _opendir: sta ptr1
cioerr: sty __oserror cioerr: sty __oserror
jmp return0 jmp return0
.proc _readdir .proc _readdir
tax tax
lda #GETREC lda #GETREC
sta ICCOM,x sta ICCOM,x
@@ -90,24 +90,27 @@ cioerr: sty __oserror
rts rts
copychar: lda (ptr1),y ; src=y dest=tmp1 copychar: lda (ptr1),y ; src=y dest=tmp1
cmp #' '
ldy tmp1 ldy tmp1
cmp #' '
beq @break beq @break
sta (ptr1),y sta (ptr1),y
iny iny
sty tmp1 sty tmp1
@break: rts @break: rts
.endproc .endproc
.proc _closedir .proc _closedir
tax tax
lda #CLOSE lda #CLOSE
sta ICCOM,x sta ICCOM,x
jsr CIOV jsr CIOV
bmi @cioerr bmi @cioerr
ldx #0
stx __oserror ; clear system specific error code
txa
rts rts
@cioerr: jmp __do_oserror @cioerr: jmp __do_oserror
.endproc .endproc
.rodata .rodata
defdev: .asciiz "D:*.*" defdev: .asciiz "D:*.*"