anchor.diff:  interface
   
   uses
  -  Classes, SysUtils, fpcunit, testutils, testregistry,
  +  Classes, SysUtils, fpcunit, testutils, testregistry, dateutils,
     mUtility, mISO6346Utility;
   
   type
  
positive.code: 
  end;
  
  
  
  initialization
  
negative.code:     procedure TestISO6346Containers;
      procedure TestISO6346MRNs;
      procedure TestHumanReadableUniqueIdentifiers;
      procedure TestEncodeDecodeTimestampForFilename;
    end;
  
  implementation
  
  
  procedure TTestCaseUtility.TestAddRemoveZeros;
  begin
  