anchor.diff:    lvTaskWork := nil;
     if not FEnable then
     begin
  -    checkFreeData(pvTaskData, pvDataFreeType);
  +    CheckFreeData(pvTaskData, pvDataFreeType);
       exit;
     end;
   
  
positive.code:     // if occur exception, push to requestPool.
      if lvRequest <> nil then requestPool.EnQueue(lvRequest);
  
      checkFreeData(pvTaskData, pvDataFreeType);
      raise;
    end;
  end;
  
negative.code: function checkInitializeTaskManager(pvWorkerCount: Integer = 0;
      pvMaxWorkerCount: Word = 0): Boolean;
  
  procedure CheckFreeData(var pvData: Pointer; pvDataFreeType: TDataFreeType);
  
  implementation
  
  