NEW
  AUTO 3,1
*--------------------------------------
* K.Mount
*  In : 
*  Out : 
*--------------------------------------
K.Mount
*--------------------------------------
* K.UMount
*  In : 
*  Out : 
*--------------------------------------
K.UMount		
				clc
				rts
*--------------------------------------
K.Online		>PULLW K.MLI.PARAMS+2
				>PULLB K.MLI.PARAMS+1
				>MLICALL MLIONLINE
				rts
*/--------------------------------------
* # GetStkObj
* ## C
* `int *ptr getstkobj (shoirt int hStkObj);`
* ## ASM
* `lda hStkObj`
* `>SYSCALL GetStkObj`
* ## RETURN VALUE
*  CC : success
*   X = hMem
*   Y,A = ptr
*  CS : error
*   A = EC
*\--------------------------------------
K.GetStkObj		tax						hMem for CopyToMain
				
				jsr MEM.GetMemByID
				
				ldy #S.MEM.LEN
				lda (ZPMemMgrSPtr),y
				pha
				iny
				lda (ZPMemMgrSPtr),y
				ply						YA = Len

				jmp MEM.CopyToMain
*--------------------------------------
MAN
SAVE usr/src/sys/kernel.s.mount
LOAD usr/src/sys/kernel.s
ASM