# HG changeset patch
# User Sean Halle <seanhalle@yahoo.com>
# Date 1345922541 25200
# Node ID 88f71110f1a9a095fce55b6fcda73c86c9fbfcef
# Parent  88fd330feef342b528a27c33a3597f953e122a6a
works, with test app sending in a chain, in mult-threaded mode

diff -r 88fd330feef3 -r 88f71110f1a9 Services_Offered_by_VMS/Debugging/DEBUG__macros.h
--- a/Services_Offered_by_VMS/Debugging/DEBUG__macros.h	Fri Aug 17 17:15:45 2012 -0700
+++ b/Services_Offered_by_VMS/Debugging/DEBUG__macros.h	Sat Aug 25 12:22:21 2012 -0700
@@ -40,6 +40,15 @@
           }\
         }while(0);/*macro magic to isolate var-names*/
 
+   #define DEBUG__printf3( bool, msg, p1, p2, p3) \
+      do{\
+         if(bool)\
+          { printf(msg, p1, p2, p3); \
+            printf(" | function: %s\n", __FUNCTION__);\
+            fflush(stdin);\
+          }\
+        }while(0);/*macro magic to isolate var-names*/
+
 #else
    #define DEBUG__printf(  bool, msg)         
    #define DEBUG__printf1( bool, msg, param)  
diff -r 88fd330feef3 -r 88f71110f1a9 VMS__int.c
--- a/VMS__int.c	Fri Aug 17 17:15:45 2012 -0700
+++ b/VMS__int.c	Sat Aug 25 12:22:21 2012 -0700
@@ -108,7 +108,7 @@
    _VMSMasterEnv->numSlavesAlive -= 1;
    if( _VMSMasterEnv->numSlavesAlive == 0 )
     {    //no more work, so shutdown
-      VMS_SS__shutdown();  //note, creates 4 shut-down slaves
+      VMS_SS__shutdown();  //note, creates shut-down slaves on each core
     }
 
    //NOTE: dataParam was given to the processor, so should either have
@@ -143,13 +143,13 @@
 void
 VMS_int__dissipate_slaveVP( SlaveVP *animatingSlv )
  {
-         DEBUG__printf2(dbgRqstHdlr, "dissipate: %d, alive: %d",animatingSlv->slaveID, _VMSMasterEnv->numSlavesAlive-1);
+         DEBUG__printf2(dbgRqstHdlr, "VMS int dissipate slaveID: %d, alive: %d",animatingSlv->slaveID, _VMSMasterEnv->numSlavesAlive-1);
       //dis-own all locations owned by this processor, causing to be freed
       // any locations that it is (was) sole owner of
    _VMSMasterEnv->numSlavesAlive -= 1;
    if( _VMSMasterEnv->numSlavesAlive == 0 )
     {    //no more work, so shutdown
-      VMS_SS__shutdown();  //note, creates 4 shut-down processors
+      VMS_SS__shutdown();  //note, creates shut-down processor on each core
     }
 
       //NOTE: dataParam was given to the processor, so should either have