ソースを参照

* fix tcg.a_load_cgparaloc_ref for ref. sizes of 7 on little endian systems

git-svn-id: trunk@37002 -
florian 8 年 前
コミット
99ce914a61
1 ファイル変更1 行追加1 行削除
  1. 1 1
      compiler/cgobj.pas

+ 1 - 1
compiler/cgobj.pas

@@ -1202,7 +1202,7 @@ implementation
                           a_op_const_reg_reg(list,OP_SHR,cgsize,32,hreg,hreg);
                           a_load_reg_ref(list,paraloc.size,OS_16,hreg,href);
 
-                          inc(href.offset,4);
+                          inc(href.offset,2);
                           a_op_const_reg_reg(list,OP_SHR,cgsize,16,hreg,hreg);
                           a_load_reg_ref(list,paraloc.size,OS_8,hreg,href);
                         end