mirror of
https://github.com/A2osX/A2osX.git
synced 2025-01-24 21:31:20 +00:00
Kernel 0.92+
This commit is contained in:
parent
6165f24951
commit
b27bf6eb51
@ -68,7 +68,10 @@ CMD.PWD ldy #S.PS.hPREFIX
|
||||
rts
|
||||
*--------------------------------------
|
||||
CMD.CD lda (ZPArgVBufPtr)
|
||||
bne CMD.CD.1
|
||||
beq CMD.CD.HOME
|
||||
|
||||
>LDYA ZPArgVBufPtr
|
||||
bra CMD.CD.1
|
||||
|
||||
CMD.CD.HOME >LDYA L.ENV.HOME
|
||||
>SYSCALL GetEnv
|
||||
@ -78,7 +81,9 @@ CMD.CD.HOME >LDYA L.ENV.HOME
|
||||
>SYSCALL GetEnv
|
||||
bcs CMD.PWD
|
||||
|
||||
CMD.CD.1 >SYSCALL realpath
|
||||
CMD.CD.1
|
||||
* >DEBUG
|
||||
>SYSCALL realpath
|
||||
bcs CMD.POPD.RTS
|
||||
|
||||
>STYA ZPPtr1
|
||||
|
Loading…
x
Reference in New Issue
Block a user