1.1 --- a/VMS.c	Fri Nov 12 07:36:01 2010 -0800
     1.2 +++ b/VMS.c	Sat Nov 13 14:39:40 2010 -0800
     1.3 @@ -329,6 +329,14 @@
     1.4   }
     1.5  
     1.6  
     1.7 +/*Anticipating multi-tasking
     1.8 + */
     1.9 +void *
    1.10 +VMS__give_sem_env_for( VirtProcr *animPr )
    1.11 + {
    1.12 +   return _VMSMasterEnv->semanticEnv;
    1.13 + }
    1.14 +//===========================================================================
    1.15  /*there is a label inside this function -- save the addr of this label in
    1.16   * the callingPr struc, as the pick-up point from which to start the next
    1.17   * work-unit for that procr.  If turns out have to save registers, then
    1.18 @@ -782,5 +790,3 @@
    1.19     exit(1);
    1.20   }
    1.21  
    1.22 -
    1.23 -