anchor.diff:  interface
   
   Uses
  -  {$IFDEF WINDOWS} Windows, {$ENDIF} SysUtils, Classes, {$IFNDEF FPC}Soap.EncdDecd, System.NetEncoding, {$ENDIF} SyncObjs,
  +  {$IFDEF WINDOWS} Windows, {$ENDIF} SysUtils, Classes, {$IFNDEF FPC}Soap.EncdDecd, System.NetEncoding, {$ENDIF} SyncObjs, zlib,
     {$IFDEF FPC} FPCUnit, TestRegistry, RegExpr, {$ELSE} DUnitX.TestFramework, {$ENDIF}
     IdGlobalProtocols, IdSSLOpenSSLHeaders,
     FHIR.Support.Base, FHIR.Support.Utilities, FHIR.Support.Stream, FHIR.Support.Threads, FHIR.Support.Collections, FHIR.Support.Fpc,
  
positive.code:     {$IFNDEF FPC}[TestCase]{$ENDIF} Procedure testBase;
    End;
  
  implementation
  
  const psc = {$IFDEF WINDOWS} '\' {$ELSE} '/' {$ENDIF};
  
negative.code:   RegisterTest('Turtle Tests', TTurtleTests);
    RegisterTest('Language Parser Tests', TLangParserTests);
    RegisterTest('Regex Test', TFslRegexTests);
    RegisterTest('.tar.gz Tests', TTarGZParserTests);
    {$ELSE}
    TDUnitX.RegisterTestFixture(TFslGenericsTests);
    TDUnitX.RegisterTestFixture(TFslCollectionsTests);
  