Browse Source

* avoid 8-bit truncation of the sizes in the internal linker map

git-svn-id: trunk@45571 -
nickysn 5 năm trước cách đây
mục cha
commit
a5ab1c03ea
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      compiler/ogmap.pas

+ 1 - 1
compiler/ogmap.pas

@@ -63,7 +63,7 @@ implementation
     const
       HexTbl : array[0..15] of char='0123456789abcdef';
 
-    function sizestr(v:aword):string;
+    function sizestr(v:qword):string;
       var
         tmp:array [0..19] of char;
         i:longint;