anchor.diff:          end;
           if ls.IsStopped then Break;
           interlockedInc(var lcurrTasks);
  +        var temp := m;
           new Task(->
             begin
  -            body.Invoke(m, ls);
  +            body.Invoke(temp, ls);
               interlockedDec(var lcurrTasks);
               levent.lock;
               try
  
positive.code:         end;
          if ls.IsStopped then Break;
          interlockedDec(var lcurrTasks);
          new Task(->
            begin
              body.Invoke(m, ls);
              interlockedDec(var lcurrTasks);
              levent.lock;
              try
  
negative.code:         end;
          if ls.IsStopped then Break;
          interlockedInc(var lcurrTasks);
          var temp := m;
          new Task(->
            begin
              body.Invoke(temp, ls);
              interlockedDec(var lcurrTasks);
              levent.lock;
              try
  