فهرست منبع

* create the addr node for cse with create_internal to avoid errors when taking the address of a temp.

git-svn-id: trunk@26624 -
florian 11 سال پیش
والد
کامیت
3a11dd1055
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      compiler/optcse.pas

+ 1 - 1
compiler/optcse.pas

@@ -374,7 +374,7 @@ unit optcse;
 
 
                         if addrstored then
                         if addrstored then
                           templist[i]:=ctempcreatenode.create_value(getpointerdef(def),voidpointertype.size,tt_persistent,
                           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
                         else
                           templist[i]:=ctempcreatenode.create_value(def,def.size,tt_persistent,
                           templist[i]:=ctempcreatenode.create_value(def,def.size,tt_persistent,
                             def.is_intregable or def.is_fpuregable,tnode(lists.nodelist[i]));
                             def.is_intregable or def.is_fpuregable,tnode(lists.nodelist[i]));