Преглед на файлове

* RTTI: Offset of record fields is defined as SizeInt not ptruint.

git-svn-id: trunk@46460 -
yury преди 5 години
родител
ревизия
b4139720e6
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      compiler/ncgrtti.pas

+ 1 - 1
compiler/ncgrtti.pas

@@ -623,7 +623,7 @@ implementation
           begin
           begin
             sym:=tsym(fields[i]);
             sym:=tsym(fields[i]);
             write_rtti_reference(tcb,tfieldvarsym(sym).vardef,rt);
             write_rtti_reference(tcb,tfieldvarsym(sym).vardef,rt);
-            tcb.emit_ord_const(tfieldvarsym(sym).fieldoffset,ptruinttype);
+            tcb.emit_ord_const(tfieldvarsym(sym).fieldoffset,sizeuinttype);
           end;
           end;
         fields.free;
         fields.free;
       end;
       end;