mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-03 01:38:26 +02:00
* ensure that we don't firstpass a tcgnestloadnode twice, as it
changes left (should be solved in a cleaner way, by transforming the whole load node into an equivalent construct) git-svn-id: trunk@32780 -
This commit is contained in:
parent
1a09209659
commit
96698994f3
@ -179,9 +179,12 @@ implementation
|
||||
if not assigned(left) then
|
||||
internalerror(2011060104);
|
||||
firstpass(left);
|
||||
if left.resultdef.typ<>pointerdef then
|
||||
internalerror(2015122801);
|
||||
{ subscript it to get the variable }
|
||||
left:=csubscriptnode.create(thissym,cderefnode.create(left));
|
||||
firstpass(left);
|
||||
include(flags,nf_internal);
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user