mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-13 13:29:27 +02:00
* take care of tempinitcode when creating def information for tempcreatenodes
git-svn-id: trunk@26581 -
This commit is contained in:
parent
cb8100bccf
commit
c44b5d1043
@ -115,6 +115,14 @@ unit optdfa;
|
||||
function AddDefUse(var n: tnode; arg: pointer): foreachnoderesult;
|
||||
begin
|
||||
case n.nodetype of
|
||||
tempcreaten:
|
||||
begin
|
||||
if assigned(ttempcreatenode(n).tempinfo^.tempinitcode) then
|
||||
begin
|
||||
pdfainfo(arg)^.map.Add(n);
|
||||
DFASetInclude(pdfainfo(arg)^.def^,n.optinfo^.index);
|
||||
end;
|
||||
end;
|
||||
temprefn,
|
||||
loadn:
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user