fpc-gdb65.patch

   1 --- fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp~   2006-07-30 13:02:06.000000000 +0200
   2 +++ fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp    2006-10-20 20:45:42.042128766 +0200
   3 @@ -34,6 +34,10 @@
   4    {$define GDB_V6}
   5  {$endif def GDB_V604}
   6
   7 +{$ifdef GDB_V605}
   8 +  {$define GDB_V6}
   9 +{$endif def GDB_V605}
  10 +
  11
  12  {$ifdef GDB_V6}
  13    {$define GDB_HAS_SYSROOT}
  14 --- fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp~   2006-10-20 20:47:50.483467953 +0200
  15 +++ fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp    2006-10-20 20:53:38.618579164 +0200
  16 @@ -2369,9 +2369,11 @@
  17    version : array[0..0] of char;cvar;external;
  18
  19  {$ifndef GDB_V604}
  20 +{$ifndef GDB_V605}
  21  // doesn't seem to exist anymore. Seems to work fine without
  22  procedure error_init;cdecl;external;
  23  {$endif}
  24 +{$endif}
  25
  26  function  GDBVersion : string;
  27  begin
  28 --- fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp~   2006-10-20 20:56:13.897696959 +0200
  29 +++ fpcbuild_2.0.4_exp/fpcsrc/packages/base/gdbint/gdbint.pp    2006-10-20 20:59:27.565632486 +0200
  30 @@ -2428,8 +2428,10 @@
  31    set_ui_file_write(gdb_stdout,@gdbint_ui_file_write);
  32    set_ui_file_write(gdb_stderr,@gdbint_ui_file_write);
  33  {$ifndef GDB_V604}
  34 +{$ifndef GDB_V605}
  35    error_init;
  36  {$endif}
  37 +{$endif}
  38  {$ifdef GDB_V6}
  39  //  gdb_stdtargin := gdb_stdin;
  40    gdb_stdtargerr := gdb_stderr;