diff --git a/SYS/KERNEL.S.TSK.txt b/SYS/KERNEL.S.TSK.txt
index 77708400..df304f1d 100644
--- a/SYS/KERNEL.S.TSK.txt
+++ b/SYS/KERNEL.S.TSK.txt
@@ -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