Mercurial > cgi-bin > hgwebdir.cgi > VMS > VMS_Implementations > VMS_impls > VMS__MC_shared_impl
diff ProcrContext.c @ 200:6db9e4898978
VMS name chgs -- added "WL" "PI" and "int" and split vms.h up
| author | Me@portablequad |
|---|---|
| date | Sun, 12 Feb 2012 01:49:33 -0800 |
| parents | 521c75d64cef |
| children |
line diff
1.1 --- a/ProcrContext.c Sat Feb 11 21:43:43 2012 -0800 1.2 +++ b/ProcrContext.c Sun Feb 12 01:49:33 2012 -0800 1.3 @@ -15,14 +15,14 @@ 1.4 * animator state to return to -- 1.5 * 1.6 */ 1.7 -inline VirtProcr * 1.8 -create_procr_helper( VirtProcr *newPr, VirtProcrFnPtr fnPtr, 1.9 +inline SlaveVP * 1.10 +create_procr_helper( SlaveVP *newPr, VirtProcrFnPtr fnPtr, 1.11 void *initialData, void *stackLocs ) 1.12 { 1.13 void *stackPtr; 1.14 1.15 newPr->startOfStack = stackLocs; 1.16 - newPr->procrID = _VMSMasterEnv->numProcrsCreated++; 1.17 + newPr->procrID = _VMSMasterEnv->numVPsCreated++; 1.18 newPr->initialData = initialData; 1.19 newPr->requests = NULL; 1.20 newPr->schedSlot = NULL; 1.21 @@ -32,7 +32,7 @@ 1.22 */ 1.23 //instead of calling the function directly, call a wrapper function to fetch 1.24 //arguments from stack 1.25 - newPr->nextInstrPt = (VirtProcrFnPtr)&startVirtProcrFn; 1.26 + newPr->nextInstrPt = (VirtProcrFnPtr)&startVPFn; 1.27 1.28 //fnPtr takes two params -- void *initData & void *animProcr 1.29 //alloc stack locations, make stackPtr be the highest addr minus room 1.30 @@ -41,7 +41,7 @@ 1.31 stackPtr = ( (void *)stackLocs + VIRT_PROCR_STACK_SIZE - 4*sizeof(void*)); 1.32 1.33 //setup __cdecl on stack -- coreloop will switch to stackPtr before jmp 1.34 - *((VirtProcr**)stackPtr + 2 ) = newPr; //rightmost param 1.35 + *((SlaveVP**)stackPtr + 2 ) = newPr; //rightmost param 1.36 *((void**)stackPtr + 1 ) = initialData; //next param to left 1.37 *((void**)stackPtr) = (void*)fnPtr; 1.38
