mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-08 14:07:34 +00:00
Kernel 0.93+
This commit is contained in:
parent
61f832d23a
commit
59f9e298fd
Binary file not shown.
@ -579,10 +579,12 @@ PS.AddYAp12ArgSize
|
|||||||
* ## RETURN VALUE
|
* ## RETURN VALUE
|
||||||
* A = Child PSID
|
* A = Child PSID
|
||||||
*\--------------------------------------
|
*\--------------------------------------
|
||||||
|
K.Kill.PID .BS 1
|
||||||
|
*--------------------------------------
|
||||||
K.Kill cmp #0
|
K.Kill cmp #0
|
||||||
beq .99 CS
|
beq .99 CS
|
||||||
|
|
||||||
sta .1+1
|
sta K.Kill.PID
|
||||||
|
|
||||||
jsr CORE.GetPSByID
|
jsr CORE.GetPSByID
|
||||||
bcs .99
|
bcs .99
|
||||||
@ -623,7 +625,7 @@ K.Kill.2 ldy #S.PS.hSID
|
|||||||
.11 ldy .10,x
|
.11 ldy .10,x
|
||||||
|
|
||||||
lda (ZPPtr1),y
|
lda (ZPPtr1),y
|
||||||
bne .12
|
beq .12
|
||||||
|
|
||||||
jsr K.FreeMem
|
jsr K.FreeMem
|
||||||
|
|
||||||
@ -639,7 +641,7 @@ K.Kill.2 ldy #S.PS.hSID
|
|||||||
ldx #SYS.fclose
|
ldx #SYS.fclose
|
||||||
jsr K.SYSCALL2.BANK
|
jsr K.SYSCALL2.BANK
|
||||||
|
|
||||||
.1 lda #$ff SELF MODIFIED
|
.1 lda K.Kill.PID
|
||||||
|
|
||||||
ldx #0
|
ldx #0
|
||||||
|
|
||||||
|
@ -33,7 +33,7 @@ K.Open jsr PFT.YAToMLIPATH
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
UNISTD.Open ldx #5 /DEV/
|
UNISTD.Open ldx #5 /DEV/
|
||||||
cpx K.MLI.PATH
|
cpx K.MLI.PATH
|
||||||
bcs .9
|
bcs IO.OPEN.REG
|
||||||
|
|
||||||
.1 lda K.MLI.PATH,x
|
.1 lda K.MLI.PATH,x
|
||||||
cmp IO.DEV.FIFO-1,x
|
cmp IO.DEV.FIFO-1,x
|
||||||
|
Loading…
Reference in New Issue
Block a user