Browse Source

* fix non-x86 compile after r8558

git-svn-id: trunk@8559 -
peter 18 năm trước cách đây
mục cha
commit
79ca4b28a8
1 tập tin đã thay đổi với 3 bổ sung0 xóa
  1. 3 0
      compiler/ncgcal.pas

+ 3 - 0
compiler/ncgcal.pas

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