From 3a11dd1055e85c153d457dcb45e6b012918e3804 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Thu, 30 Jan 2014 17:19:04 +0000
Subject: [PATCH] * create the addr node for cse with create_internal to avoid
 errors when taking the address of a temp.

git-svn-id: trunk@26624 -
---
 compiler/optcse.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/optcse.pas b/compiler/optcse.pas
index 8f85157c8a..0f70f21bc8 100644
--- a/compiler/optcse.pas
+++ b/compiler/optcse.pas
@@ -374,7 +374,7 @@ unit optcse;
 
                         if addrstored then
                           templist[i]:=ctempcreatenode.create_value(getpointerdef(def),voidpointertype.size,tt_persistent,
-                            true,caddrnode.create(tnode(lists.nodelist[i])))
+                            true,caddrnode.create_internal(tnode(lists.nodelist[i])))
                         else
                           templist[i]:=ctempcreatenode.create_value(def,def.size,tt_persistent,
                             def.is_intregable or def.is_fpuregable,tnode(lists.nodelist[i]));