Browse Source

Fix ugly error causing troubles in go32v2 2.6.4 release IDE with GDB

git-svn-id: trunk@27281 -
pierre 11 năm trước cách đây
mục cha
commit
1396e903a5
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      rtl/go32v2/initc.pp

+ 1 - 1
rtl/go32v2/initc.pp

@@ -72,7 +72,7 @@ procedure run_c_destructors;
        exit;
      already_done:=bss_count;
      f:=dtor[0];
-     nb:=((cardinal(last_dtor)-cardinal(first_dtor)) div sizeof(pointer));
+     nb:=((cardinal(@last_dtor)-cardinal(@first_dtor)) div sizeof(pointer));
      for i:=1 to nb do
        begin
           f();