anchor.diff:  
   //----------------------------------------------------------------------------------------------------------------------
   
  -procedure _sprintf(Buffer, Format: PChar; Arguments: va_list);
  +procedure sprintf(Buffer, Format: PChar; Arguments: va_list);
   
   // Optional parameters are passed in a va_list as the last parameter. 
   
   begin
  -  wvsprintf(Buffer, Format, Arguments);
  -end;
  -
  -//----------------------------------------------------------------------------------------------------------------------
  -
  -function _sqrt(Value: Double): Double;
  +  wvsprintf(Buffer, Format, @Arguments);
  +end;
  +
  +//----------------------------------------------------------------------------------------------------------------------
  +
  +function sqrt(Value: Double): Double;
   
   begin
     Result := System.Sqrt(Value); // Different types but same name. Keep this stub!
  
positive.code: 
  //----------------------------------------------------------------------------------------------------------------------
  
  function _fwrite(const buf; recsize, reccount: Integer; Stream: TStream): Integer;
  
  begin
    Result := Stream.Write(buf, recsize * reccount)
  
negative.code: 
  //----------------------------------------------------------------------------------------------------------------------
  
  procedure fprintf;
  
  begin
    raise Exception.Create('Fatal error: stub function fprintf cannot be executed.');
  