Browse Source

Fix Absolute var symbol address (was failing for AVR cpu)

git-svn-id: trunk@37320 -
pierre 7 years ago
parent
commit
1aa731df63
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/utils/ppuutils/ppudump.pp

+ 1 - 1
compiler/utils/ppuutils/ppudump.pp

@@ -2746,7 +2746,7 @@ begin
                  Writeln(['Assembler name : ',getstring]);
                toaddr :
                  begin
-                   Write(['Address : ',getaword]);
+                   Write(['Address : ',getpuint]);
                    if tsystemcpu(ppufile.header.common.cpu)=cpu_i386 then
                      Write([' (Far: ',getbyte<>0,')']);
                    if tsystemcpu(ppufile.header.common.cpu)=cpu_i8086 then