瀏覽代碼

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

git-svn-id: trunk@37320 -
pierre 8 年之前
父節點
當前提交
1aa731df63
共有 1 個文件被更改,包括 1 次插入1 次删除
  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