|
@@ -123,8 +123,6 @@ implementation
|
|
end;
|
|
end;
|
|
if (varindex<0) then
|
|
if (varindex<0) then
|
|
internalerror(2009081805);
|
|
internalerror(2009081805);
|
|
- if (tfieldvarsym(variantstarts[varindex]).fieldoffset<>field.fieldoffset) then
|
|
|
|
- internalerror(2009081804);
|
|
|
|
|
|
|
|
{ variant at the same level as a previous one }
|
|
{ variant at the same level as a previous one }
|
|
variantstarts.count:=varindex+1;
|
|
variantstarts.count:=varindex+1;
|