view level2/modules/kernel/fid.asm @ 3195:6eb2edad80d8

L2: Introduce symbol KrnBlk to define kernel block number This is the block number that the kernel is loaded into. This is platform-specific, a function of the behaviour of the platform MMU/DAT. CRCs are unaffected by this change.
author Neal Crook <foofoobedoo@gmail.com>
date Thu, 01 Jun 2017 22:13:49 +0100
parents ca83286ded5b
children
line wrap: on
line source

**************************************************
* System Call: F$ID
*
* Function: Return's caller's process ID
*
* Input:  None
*
* Output: A = Caller's process ID
*         Y = User ID
*
* Error:  CC = C bit set; B = error code
*
FID      ldx   <D.Proc      get current process pointer
         lda   P$ID,x       get ID
         sta   R$A,u        save it
         ldd   P$User,x     get user #
         std   R$Y,u        save it
         clrb               clear error
         rts