anchor.diff:    end;
   end;
   
  -procedure TMARSEngine.AddSubscriber(const ASubscriber: IMARSHandleListener);
  +function TMARSEngine.AddSubscriber(const ASubscriber: IMARSHandleListener): TMARSEngine;
   begin
     FSubscribers.Add(ASubscriber);
  +  Result := Self;
   end;
   
   constructor TMARSEngine.Create;
  
positive.code:   DoAfterRequestEnd(LStopWatchEx);
  end;
  
  procedure TMARSEngine.RemoveSubscriber(const ASubscriber: IMARSHandleListener);
  begin
    FSubscribers.Remove(ASubscriber);
  end;
  
  function TMARSEngine.SetBasePath(const ABasePath: string): TMARSEngine;
  
negative.code:   Result := Self;
  end;
  
  function TMARSEngine.GetRequest: TMARSRequest;
  begin
    Result := FRequest;
  end;
  
  function TMARSEngine.GetResponse: TMARSResponse;
  begin
    Result := FResponse;
  end;
  
  class function TMARSEngine.GetServerDirectory: string;
  begin
    if FServerDirectory = '' then
  