anchor.diff:      function SayHelloWorld: string;
     end;
   
  -  [Path('item'), Produces(TMediaType.APPLICATION_JSON)]
  -  TItemResource = class
  -    type
  -      TItem = record
  -        id: string;
  -        name: string;
  -        constructor Create(AId: string; AName: string);
  -      end;
  -  private
  -  public
  -    [GET]
  -    function GetItems: TArray<TItem>;
  -  end;
  -
     [Path('token')]
     TTokenResource = class(TMARSTokenResource)
     end;
  
positive.code:   Result := 'Hello World!';
  end;
  
  { TItemResource }
  
  function TItemResource.GetItems: TArray<TItem>;
  begin
    Result := [
      TItem.Create('1', 'Andrea')
    , TItem.Create('2', 'Guido')
    ];
  end;
  
  { TItemResource.TItem }
  
  constructor TItemResource.TItem.Create(AId, AName: string);
  begin
    id := AId;
    name := AName;
  end;
  
  initialization
    TMARSResourceRegistry.Instance.RegisterResource<THelloWorldResource>;
    TMARSResourceRegistry.Instance.RegisterResource<TItemResource>;
    TMARSResourceRegistry.Instance.RegisterResource<TTokenResource>;
  end.
  
negative.code: 
  uses
      MARS.Core.Registry
  ;
  
  { THelloWorldResource }
  