From c44b5d10433ca29fbc41ec7e81ef1a2bd9ec1e9a Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 25 Jan 2014 09:40:51 +0000
Subject: [PATCH] * take care of tempinitcode when creating def information for
 tempcreatenodes

git-svn-id: trunk@26581 -
---
 compiler/optdfa.pas | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/compiler/optdfa.pas b/compiler/optdfa.pas
index e1beefaa04..5f65379fb9 100644
--- a/compiler/optdfa.pas
+++ b/compiler/optdfa.pas
@@ -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