anchor.diff:      property IsVerified: Boolean read FIsVerified;
       property Claims: TMARSParameters read FClaims;
       property Expiration: TDateTime read GetExpiration;
  +    property Issuer: string read FIssuer;
       property IssuedAt: TDateTime read GetIssuedAt;
       property Duration: TDateTime read FDuration;
       property CookieEnabled: Boolean read FCookieEnabled;
  
positive.code:     FCookieSecure: Boolean;
      FRequest: TWebRequest;
      FResponse: TWebResponse;
      function GetUserName: string;
      procedure SetUserName(const AValue: string);
      function GetExpiration: TDateTime;
  
negative.code:   LJWT := TJWT.Create(TJWTClaims);
    try
      LIssuedAt := Now;
      FClaims[TReservedClaimNames.ISSUER] := FIssuer;
      FClaims[TReservedClaimNames.ISSUED_AT] := DateTimeToUnix(LIssuedAt, False);
      FClaims[TReservedClaimNames.EXPIRATION] := DateTimeToUnix(LIssuedAt + Duration, False);
      FClaims.SaveToJSON(LJWT.Claims.JSON);
  