anchor.diff:      Result := GetLastError
     else
     begin
  +    {$IFDEF DefeatWarnings}{$IFDEF Version6} {$WARN SYMBOL_PLATFORM OFF} {$ENDIF} {$ENDIF}
       Result := FileSetDate(f, Age);
  +    {$IFDEF DefeatWarnings}{$IFDEF Version6} {$WARN SYMBOL_PLATFORM ON} {$ENDIF}{$ENDIF}
       FileClose(f);
     end;
   end;
  
positive.code: end;
  {$ENDIF}
  { -------------------------------------------------------------------------- }
  {!!.01 -- End Added }
  function AbSwapLongEndianness(Value : LongInt): LongInt;
  { convert BigEndian <-> LittleEndian 32-bit value }
  
negative.code: 
    function AbSetFileDate(const FileName : string;const Age : LongInt) : Integer; {!!.05}
  
    function AbFlushOsBuffers(Handle : Integer) : Boolean;
  
  { file attributes }
    function AbDOS2UnixFileAttributes(Attr: LongInt): LongInt;
    function AbUnix2DosFileAttributes(Attr: LongInt): LongInt;
  