diff --git a/compiler/pinline.pas b/compiler/pinline.pas index 57c737eee8..e2bc436560 100644 --- a/compiler/pinline.pas +++ b/compiler/pinline.pas @@ -76,7 +76,7 @@ implementation storepos : tfileposinfo; variantdesc : pvariantrecdesc; found : boolean; - j,i : ASizeInt; + j,i : longint; variantselectsymbol : tfieldvarsym; begin if target_info.system in systems_managed_vm then diff --git a/compiler/symdef.pas b/compiler/symdef.pas index 416deea8d9..45778d21b4 100644 --- a/compiler/symdef.pas +++ b/compiler/symdef.pas @@ -3465,7 +3465,7 @@ implementation procedure readvariantrecdesc(var variantrecdesc : pvariantrecdesc); var - i,j : asizeint; + i,j : longint; begin if ppufile.getbyte=1 then begin @@ -3607,7 +3607,7 @@ implementation procedure writevariantrecdesc(variantrecdesc : pvariantrecdesc); var - i,j : asizeint; + i,j : longint; begin if assigned(variantrecdesc) then begin