Kernel 0.93+

BIN/SH.S.txt

@@ -232,9 +232,6 @@ CS.RUN			jsr CL.Init
 
 				>PUSHEA.G StatBuf
 				>LDYA L.HOME.PROFILE
-				>SYSCALL puts
-				>LDYA L.HOME.PROFILE
-*				>DEBUG
 				>SYSCALL STAT
 				bcs CS.RUN.LOOP			no profile...
 

INC/A2osX.I.txt

@@ -256,9 +256,9 @@ SYS.ExecV			.EQ $A2
 *					.EQ $A4
 SYS.Kill			.EQ $A6
 
-SYS.GetPWUID		.EQ $A8
+*					.EQ $A8
-SYS.GetPWName		.EQ $AA
+*					.EQ $AA
-SYS.PutPW			.EQ $AC
+*					.EQ $AC
 *					.EQ $AE
 
 SYS.Args2ArgV		.EQ $B0
@@ -271,24 +271,24 @@ SYS.SetEnv			.EQ $BA
 SYS.GetEnv			.EQ $BC
 SYS.UnsetEnv		.EQ $BE
 *--------------------------------------
-*SYS.FAdd			.EQ $C0
+*					.EQ $C0
-*SYS.FSub			.EQ $C2
+*					.EQ $C2
-*SYS.FMult			.EQ $C4
+*					.EQ $C4
-*SYS.FDiv			.EQ $C6
+*					.EQ $C6
 
-*SYS.FPwr			.EQ $C8
+*					.EQ $C8
 *					.EQ $CA
 SYS.LRIntF			.EQ $CC
 SYS.Float			.EQ $CE
 
-*SYS.Log			.EQ $D0
+SYS.GetPWUID		.EQ $D0
-*SYS.Sqr			.EQ $D2
+SYS.GetPWName		.EQ $D2
-*SYS.Exp			.EQ $D4
+SYS.PutPW			.EQ $D4
-*SYS.Cos			.EQ $D6
+*					.EQ $D6
 
-*SYS.Sin			.EQ $D8
+*					.EQ $D8
-*SYS.Tan			.EQ $DA
+*					.EQ $DA
-*SYS.ATan			.EQ $DC
+*					.EQ $DC
 *					.EQ $DF
 *--------------------------------------
 SYS.GetMem			.EQ $E0

SYS/KERNEL.S.CORE.txt

@@ -491,6 +491,12 @@ CORE.PSFree		sta .10+1				Save PS ID
 				bcs .9
 				>STYA ZPPtr1
 				
+				ldy #S.PS.hSID
+				lda (ZPPtr1),y
+				tax
+				lda S.Table.hSession-1,x
+				jsr K.FreeMem
+				
 				ldy #S.PS.hSS
 				jsr .8
 				

SYS/KERNEL.S.INIT.txt

@@ -1041,6 +1041,13 @@ PwdMgrInit		>LDYAI MSG.PWD
 				>STYA pSession
 				stx S.Table.hSession
 				
+				phy
+				ldy #S.PS.ZP.SESSION+1
+				sta (pPS),y
+				dey
+				pla
+				sta (pPS),y
+				
 				lda #1
 				ldy #S.PS.hSID
 				sta (pPS),y

SYS/KERNEL.S.JMP.txt

@@ -101,9 +101,9 @@ K.SYSCALL		.DA K.GetMemStat		$00
 				.DA K.ExecV
 				.DA 0
 				.DA K.Kill
-				.DA K.GetPWUID
+				.DA 0
-				.DA K.GetPWName
+				.DA 0
-				.DA K.PutPW
+				.DA 0
 				.DA 0
 
 				.DA K.Args2ArgV			$B0
@@ -124,9 +124,9 @@ K.SYSCALL		.DA K.GetMemStat		$00
 				.DA K.LRIntF
 				.DA K.Float
 
-				.DA 0					$D0
+				.DA K.GetPWUID			$D0
-				.DA 0
+				.DA K.GetPWName
-				.DA 0
+				.DA K.PutPW
 				.DA 0
 				.DA 0
 				.DA 0

SYS/KERNEL.S.PS.txt

@@ -186,6 +186,9 @@ PS.CreateChild	ldx #0
 				ldy #S.PS.hSID
 				lda (ZPPtr1),y
 				sta (PS.NewPSPtr),y
+				tax
+				lda S.Table.hSession-1,x
+				
 				jsr K.GetMemPtr
 				phy
 				ldy #S.PS.ZP.SESSION+1
@@ -194,6 +197,8 @@ PS.CreateChild	ldx #0
 				pla
 				sta (PS.NewPSPtr),y
 
+				jsr Mem.IncRefCnt
+
 				lda #S.PS.F.HOLD
 				bit PS.Flags
 				beq .8

SYS/KERNEL.S.txt

@@ -51,13 +51,13 @@ A2osX.D1		.PH	$D000
 				.EP
 A2osX.D2		.PH	$D000
 				.DA #RRAMWRAMBNK2
+				.INB USR/SRC/SYS/KERNEL.S.BIN
 				.INB USR/SRC/SYS/KERNEL.S.STRING
 				.INB USR/SRC/SYS/KERNEL.S.TIME
-				.INB USR/SRC/SYS/KERNEL.S.BIN
 				.INB USR/SRC/SYS/KERNEL.S.PS
+				.INB USR/SRC/SYS/KERNEL.S.ARG
 				.INB USR/SRC/SYS/KERNEL.S.ENV
 				.INB USR/SRC/SYS/KERNEL.S.PWD
-				.INB USR/SRC/SYS/KERNEL.S.ARG
 				.EP
 A2osX.E0		.PH $E000
 				.INB USR/SRC/SYS/KERNEL.S.JMP