KERNEL:ps QUIT now called when INIT failed

This commit is contained in:
Rémy GIBERT 2016-03-17 15:33:37 +01:00
parent 01245d7147
commit dab1b519fb

View File

@ -553,7 +553,12 @@ S.InitProcess lda S.CreateProcessA.Args
ldx #TSKMGR.INIT
jsr pCodeJmp Call INIT function
bcc .99
pha save error code
ldx #TSKMGR.QUIT
jsr pCodeJmp Call QUIT function
pla get back error code
sec
.99 rts
*--------------------------------------
* S.SelectProcessA