Przeglądaj źródła

* fix argv0 passing in gdb_init call

git-svn-id: trunk@6289 -
pierre 18 lat temu
rodzic
commit
2f873f287b
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      packages/base/gdbint/gdbint.pp

+ 1 - 1
packages/base/gdbint/gdbint.pp

@@ -2502,7 +2502,7 @@ begin
 {$ifdef GDB_INIT_HAS_ARGV0}
   getmem(argv0,length(paramstr(0))+1);
   strpcopy(argv0,paramstr(0));
-  gdb_init(@argv0);
+  gdb_init(argv0);
   freemem(argv0,length(paramstr(0))+1);
 {$else not GDB_INIT_HAS_ARGV0}
   gdb_init;