anchor.diff:      {$Note This occurs every now and again with TfpgMemo and CaretInvert painting! }
       // Investigate this.
       {$IFDEF DEBUG}
  -    writeln('TfpgCaret.InvertCaret cause an exception');
  +    SendDebug('TfpgCaret.InvertCaret cause an exception');
       {$ENDIF}
     end;
   end;
  
positive.code: {$ifdef AGGCanvas}
    Agg2D,
  {$endif}
    fpg_imgfmt_bmp,
    fpg_stdimages,
    fpg_translations,
  
negative.code:     end;
  
    {$IFDEF DEBUG}
    SendDebug('GetNamedFontDesc error: "' + afontid + '" is missing. Default is used.');
    {$ENDIF}
    Result := FPG_DEFAULT_FONT_DESC;
  end;
  