Преглед изворни кода

* Don't assume pointers are 8 bytes.

git-svn-id: trunk@7981 -
daniel пре 18 година
родитељ
комит
20a804152d
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/ncgcnv.pas

+ 1 - 1
compiler/ncgcnv.pas

@@ -382,7 +382,7 @@ interface
       location_reset(location,LOC_REFERENCE,OS_NO);
       location.reference:=r;
       cg.a_load_const_ref(current_asmdata.currasmlist,OS_ADDR,0,r);
-      inc(r.offset,8);
+      inc(r.offset,sizeof(aword));
       cg.a_load_const_ref(current_asmdata.currasmlist,OS_ADDR,0,r);
     end;