瀏覽代碼

* fix non-x86 compile after r8558

git-svn-id: trunk@8559 -
peter 18 年之前
父節點
當前提交
79ca4b28a8
共有 1 個文件被更改,包括 3 次插入0 次删除
  1. 3 0
      compiler/ncgcal.pas

+ 3 - 0
compiler/ncgcal.pas

@@ -509,6 +509,9 @@ implementation
       var
         cgsize    : tcgsize;
         retloc    : tlocation;
+{$ifndef x86}
+        hregister : tregister;
+{$endif not x86}
       begin
         { Check that the return location is set when the result is passed in
           a parameter }