anchor.diff:    uregexpr,
     UCommon,
     UCrypto,
  -  UEncoding;
  +  UEncoding,
  +  SyncObjs;
   
   type
   
  
positive.code: class constructor TEPasaParser.CreateRegexEPasaParser;
  begin
    FEPasaRegex := TCustomRegex.Create(EPasaPattern);
  end;
  
  class destructor TEPasaParser.DestroyRegexEPasaParser;
  begin
    FEPasaRegex.Free;
  end;
  
  function TEPasaParser.Parse(const AEPasaText: String): TEPasa;
  
negative.code:     AErrorCode := EPasaErrorCode.BadFormat;
      Exit(False);
    end;
  
    Finally
      FEPasaLocker.Release;
    End;
  
    if (LAccountName <> #0) then begin
      // Account Name
  