anchor.diff:    LOpenAPI: TOpenAPI;
     LReader: TMARSMetadataReader;
     LServer: TServer;
  +  LApplicationBasePath: string;
   begin
     Assert(Assigned(AEngine));
   
  
positive.code: end;
  
  function TOpenAPIHelper.AddServerFromEngine(const AEngine: TMARSEngine): TServer;
  begin
    Result := AddServer;
               // '{protocol}://localhost:{port}{engine}{application}'
    Result.url := '{protocol}://{hostname}:{port}{engine}{application}';
    Result.description := AEngine.Name;
  
    Result.variables.Add('hostname'
    , TServerVariable.Create([], 'localhost', 'Host name'));
  
    Result.variables.Add('engine'
    , TServerVariable.Create([], TMARSURL.EnsureFirstPathDelimiter(AEngine.BasePath), 'Engine base path'));
  
    Result.variables.Add('port'
    , TServerVariable.Create([AEngine.Port.ToString, AEngine.PortSSL.ToString]
  
negative.code: 
      LServer := LOpenAPI.AddServerFromEngine(AEngine);
  
      LApplicationBasePath := TMARSURL.EnsureFirstPathDelimiter(AApplication.BasePath);
      if LApplicationBasePath <> '' then
      begin
        LServer.url := LServer.url + '{application}';
        LServer.variables.Add('application', TServerVariable.Create([], LApplicationBasePath, 'Application'));
      end;
  
      if AApplication.Parameters.ByNameText(JWT_SECRET_PARAM, JWT_SECRET_PARAM_DEFAULT).AsString <> '' then
        LOpenAPI.ReadBearerSecurityScheme('JWT_bearer', AApplication.Parameters);
  