Explorar o código

Fix constant pointer reading for 64 bit CPU

git-svn-id: trunk@17962 -
pierre %!s(int64=14) %!d(string=hai) anos
pai
achega
5a2d6c0429
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/utils/ppudump.pp

+ 1 - 1
compiler/utils/ppudump.pp

@@ -1508,7 +1508,7 @@ begin
                  begin
                    write  (space,'  PointerType : ');
                    readderef('');
-                   writeln(space,'        Value : ',getlongint)
+                   writeln(space,'        Value : ',getaint)
                  end;
                conststring,
                constresourcestring :