浏览代码

* fixed the far pointer size not being updated after reading the near/far type modifier, which caused far pointers to be allocated only 2 bytes

git-svn-id: trunk@24554 -
nickysn 12 年之前
父节点
当前提交
abeb2a3aaa
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/pdecl.pas

+ 1 - 0
compiler/pdecl.pas

@@ -730,6 +730,7 @@ implementation
                            tpointerdef(hdef).x86pointertyp:=x86pt_near;
                            tpointerdef(hdef).x86pointertyp:=x86pt_near;
                          consume(_SEMICOLON);
                          consume(_SEMICOLON);
                        end;
                        end;
+                    tpointerdef(hdef).update_savesize;
 {$else x86}
 {$else x86}
                     { Previous versions of FPC support declaring a pointer as
                     { Previous versions of FPC support declaring a pointer as
                       far even on non-x86 platforms.
                       far even on non-x86 platforms.