mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-28 21:29:42 +00:00
49 lines
822 B
Plaintext
49 lines
822 B
Plaintext
PR#3
|
||
PREFIX /A2OSX.SRC
|
||
NEW
|
||
INC 1
|
||
AUTO 6
|
||
.LIST OFF
|
||
*--------------------------------------
|
||
* In :
|
||
* X = #SYSCall
|
||
* Y,A = PATH (PSTR)
|
||
* Out :
|
||
* CC : Y,A = PTR to S.DIR
|
||
* CS : A = EC
|
||
*--------------------------------------
|
||
S.OPENDIRYA jsr S.PFTCHECKPATHYA
|
||
* if
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
* In :
|
||
* Y,A = PTR to S.DIR
|
||
* Out :
|
||
* CC : Y,A = PTR to S.DIRENT
|
||
* CS : A = EC
|
||
*--------------------------------------
|
||
S.READDIRYA
|
||
|
||
.8 clc
|
||
rts
|
||
|
||
.9 sec
|
||
rts
|
||
*--------------------------------------
|
||
* In :
|
||
* Y,A = PTR to S.DIR
|
||
*--------------------------------------
|
||
S.CLOSEDIRYA
|
||
|
||
rts
|
||
|
||
*--------------------------------------
|
||
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE SYS/KERNEL.S.DIR
|
||
LOAD SYS/KERNEL.S
|
||
ASM
|