Browse Source

* fix from r13288

git-svn-id: trunk@13289 -
Jonas Maebe 16 years ago
parent
commit
f5a24d0f5b
1 changed files with 4 additions and 1 deletions
  1. 4 1
      compiler/pinline.pas

+ 4 - 1
compiler/pinline.pas

@@ -79,7 +79,10 @@ implementation
         p:=comp_expr(true);
         p:=comp_expr(true);
         { calc return type }
         { calc return type }
         if is_new then
         if is_new then
-          set_varstate(p,vs_written,[])
+          begin
+            set_varstate(p,vs_written,[]);
+            valid_for_var(p,true);
+          end
         else
         else
           set_varstate(p,vs_readwritten,[vsf_must_be_valid]);
           set_varstate(p,vs_readwritten,[vsf_must_be_valid]);
         if (m_mac in current_settings.modeswitches) and
         if (m_mac in current_settings.modeswitches) and