Mercurial > hg > Members > kono > nitros9-code

view level2/modules/kernel/fgprdsc.asm @ 2758:e4a0f58a5f9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Found that people who do not have the envirornment variable NITROS9DIR set before building the project get a error missing file "/rules.mak". Found this is caused do to the fact that the code to set this envirornment variable is in the rules.mak which can't get loaded. To fix this the code needed to set the envirornment variable that is in the rules.mak is now in the makefile(s) right before the include for the rules.mak file. This should fix the problem for those who do not have the NITROS9DIR envirornment variable preset.
author drencor-xeen
date Mon, 14 Jan 2013 14:37:46 -0600
parents 1da8ab9ba433
children 039ddb7c8ad7
line wrap: on
line source

**************************************************
* System Call: F$GPrDsc
*
* Function: Get copy of process descriptor
*
* Input:  A = Desired process ID
*         X = 512 byte buffer pointer
*
* Output: None
*
* Error:  CC = C bit set; B = error code
*
FGPrDsc  ldx   <D.Proc     Get current process dsc. ptr.
         ldb   P$Task,x    Get task number
         lda   R$A,u       Get requested process ID #
         os9   F$GProcP    Get ptr to process to descriptor
         bcs   L0962       Error, exit with it
         lda   <D.SysTsk   Get system task #
         leax  ,y          Point X to the process descriptor
         ldy   #P$Size     Y=Size of process descriptor (512 bytes)
         ldu   R$X,u       Get requested place to put copy of process dsc.
         os9   F$Move      Move it into caller's space
L0962    rts