mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-20 03:31:42 +00:00
Kernel 0.9.1 : KERNEL.S.DIRENT.TXT, bugfix #33, preventing ls / listing empty drives properly
This commit is contained in:
parent
6a25ed8ddb
commit
38f75321b9
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -116,7 +116,7 @@ K.ReadDir.A.ROOT
|
||||
stz K.ReadDir.A.EC
|
||||
|
||||
ldy #0
|
||||
|
||||
|
||||
.1 lda (ZPPtr2),y
|
||||
and #$0F
|
||||
beq .2
|
||||
@ -192,20 +192,22 @@ K.ReadDir.A.ROOT
|
||||
>STYA K.S.STAT+S.STAT.BLOCKS
|
||||
|
||||
.80 jsr K.ReadDir.A.ADDSTAT
|
||||
|
||||
dec K.ReadDir.A.EC
|
||||
beq .5
|
||||
|
||||
.88 lda ZPPtr2
|
||||
clc
|
||||
adc #16
|
||||
sta ZPPtr2
|
||||
bcc .89
|
||||
bcc .3
|
||||
inc ZPPtr2+1
|
||||
.89 dec K.ReadDir.A.EC
|
||||
bne .3
|
||||
|
||||
bra .3
|
||||
|
||||
* lda #0 done by S.MEM.F.INIT0
|
||||
* sta (ZPPtr4) Ending 0
|
||||
|
||||
ldy #S.NODE.DIR.FC
|
||||
.5 ldy #S.NODE.DIR.FC
|
||||
lda #16
|
||||
sta (ZPPtr1),y Flag that we returned somthing for next time
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user