Use correct field for sl_absolutetype or sl_typeconv ppropaccesslistitem type (revealed by compilation with -CriotR)

git-svn-id: trunk@40109 -
This commit is contained in:
pierre 2018-10-31 14:43:18 +00:00
parent 0e012e657f
commit 8f7707d474

View File

@ -2496,7 +2496,7 @@ implementation
sl_absolutetype, sl_absolutetype,
sl_typeconv: sl_typeconv:
begin begin
currdef:=tfieldvarsym(symlist^.sym).vardef; currdef:=symlist^.def;
{ ignore, these don't change the address } { ignore, these don't change the address }
end; end;
sl_vec: sl_vec: