Mercurial > cgi-bin > hgwebdir.cgi > VMS > VMS_Implementations > VMS_impls > VMS__MC_shared_impl

comparison VMS.h @ 73:d8f12351f7cc

find changesets by author, revision, files, or words in the commit message
generic VMS lib
author Merten Sach <msach@mailbox.tu-berlin.de>
date Thu, 02 Jun 2011 12:36:14 +0200
parents 5ff1631c26ed
children 9ddbb071142d
comparison
equal deleted inserted replaced
39:d2f68a7ad427 40:284156c6cb94
223 void *semanticEnv; 223 void *semanticEnv;
224 void *OSEventStruc; //for future, when add I/O to BLIS 224 void *OSEventStruc; //for future, when add I/O to BLIS
225 MallocProlog *freeListHead; 225 MallocProlog *freeListHead;
226 int32 amtOfOutstandingMem; //total currently allocated 226 int32 amtOfOutstandingMem; //total currently allocated
227 227
228 void *coreLoopStartPt;//addr to jump to to re-enter coreLoop 228 void *coreLoopReturnPt;//addr to jump to to re-enter coreLoop
229 void *coreLoopEndPt; //addr to jump to to shut down a coreLoop
230 229
231 int32 setupComplete; 230 int32 setupComplete;
232 volatile int32 masterLock; 231 volatile int32 masterLock;
233 232
234 int32 numMasterInARow[NUM_CORES];//detect back-to-back masterVP 233 int32 numMasterInARow[NUM_CORES];//detect back-to-back masterVP
401 makeFixedBinHist( numBins, startVal, binWidth, name ); 400 makeFixedBinHist( numBins, startVal, binWidth, name );
402 401
403 402
404 #define MEAS__SUB_CREATE /*turn on/off subtraction of create from plugin*/ 403 #define MEAS__SUB_CREATE /*turn on/off subtraction of create from plugin*/
405 404
405 #ifdef VPTHREAD
406
406 //VPThread 407 //VPThread
407 #define createHistIdx 1 408 #define createHistIdx 1
408 #define mutexLockHistIdx 2 409 #define mutexLockHistIdx 2
409 #define mutexUnlockHistIdx 3 410 #define mutexUnlockHistIdx 3
410 #define condWaitHistIdx 4 411 #define condWaitHistIdx 4
411 #define condSignalHistIdx 5 412 #define condSignalHistIdx 5
412 413
414 #define MakeTheMeasHists \
415 _VMSMasterEnv->measHistsInfo = \
416 makePrivDynArrayOfSize( (void***)&(_VMSMasterEnv->measHists), 200); \
417 makeAMeasHist( createHistIdx, "Create", 50, 0, 100 ) \
418 makeAMeasHist( mutexLockHistIdx, "mutex lock", 50, 0, 100 ) \
419 makeAMeasHist( mutexUnlockHistIdx, "mutex unlock", 50, 0, 100 ) \
420 makeAMeasHist( condWaitHistIdx, "cond wait", 50, 0, 100 ) \
421 makeAMeasHist( condSignalHistIdx, "cond signal", 50, 0, 100 )
422
423 #endif
424
425
426 #ifdef VCILK
427
413 //VCilk 428 //VCilk
414 #define spawnHistIdx 1 429 #define spawnHistIdx 1
415 #define syncHistIdx 2 430 #define syncHistIdx 2
431
432 #define MakeTheMeasHists \
433 _VMSMasterEnv->measHistsInfo = \
434 makePrivDynArrayOfSize( (void***)&(_VMSMasterEnv->measHists), 200); \
435 makeAMeasHist( spawnHistIdx, "Spawn", 50, 0, 200 ) \
436 makeAMeasHist( syncHistIdx, "Sync", 50, 0, 200 )
437
438
439 #endif
440
441 #ifdef SSR
416 442
417 //SSR 443 //SSR
418 #define SendFromToHistIdx 1 444 #define SendFromToHistIdx 1
419 #define SendOfTypeHistIdx 2 445 #define SendOfTypeHistIdx 2
420 #define ReceiveFromToHistIdx 3 446 #define ReceiveFromToHistIdx 3
421 #define ReceiveOfTypeHistIdx 4 447 #define ReceiveOfTypeHistIdx 4
422 448
423
424 #define MakeTheMeasHists \ 449 #define MakeTheMeasHists \
425 _VMSMasterEnv->measHistsInfo = \ 450 _VMSMasterEnv->measHistsInfo = \
426 makePrivDynArrayOfSize( (void***)&(_VMSMasterEnv->measHists), 200);\ 451 makePrivDynArrayOfSize( (void***)&(_VMSMasterEnv->measHists), 200); \
427 makeAMeasHist( spawnHistIdx, "Spawn", 50, 0, 200 ) \ 452 makeAMeasHist( SendFromToHistIdx, "SendFromTo", 50, 0, 100 ) \
428 makeAMeasHist( syncHistIdx, "Sync", 50, 0, 200 ) 453 makeAMeasHist( SendOfTypeHistIdx, "SendOfType", 50, 0, 100 ) \
429 454 makeAMeasHist( ReceiveFromToHistIdx,"ReceiveFromTo", 50, 0, 100 ) \
430 // makeAMeasHist( createHistIdx, "Create", 50, 0, 100 ) \ 455 makeAMeasHist( ReceiveOfTypeHistIdx,"ReceiveOfType", 50, 0, 100 )
431 // makeAMeasHist( mutexLockHistIdx, "mutex lock", 50, 0, 100 ) \ 456
432 // makeAMeasHist( mutexUnlockHistIdx, "mutex unlock", 50, 0, 100 ) \ 457 #endif
433 // makeAMeasHist( condWaitHistIdx, "cond wait", 50, 0, 100 ) \
434 // makeAMeasHist( condSignalHistIdx, "cond signal", 50, 0, 100 )
435
436 // makeAMeasHist( SendFromToHistIdx, "SendFromTo", 50, 0, 100 ) \
437 // makeAMeasHist( SendOfTypeHistIdx, "SendOfType", 50, 0, 100 ) \
438 // makeAMeasHist( ReceiveFromToHistIdx,"ReceiveFromTo", 50, 0, 100 ) \
439 // makeAMeasHist( ReceiveOfTypeHistIdx,"ReceiveOfType", 50, 0, 100 )
440
441 458
442 //=========================================================================== 459 //===========================================================================
443 //VPThread 460 //VPThread
444 461
445 462