Author: cesar
Date: 2006-01-17 21:26:21 -0500 (Tue, 17 Jan 2006)
New Revision: 55705

Modified:
   trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/ChangeLog
   trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/Parser.cs
Log:
2006-01-17  Cesar Lopez Nataren  <[EMAIL PROTECTED]>

        * Parser.cs: Propagate the proper parent.  Fixes #75166.

Modified: trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/ChangeLog
===================================================================
--- trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/ChangeLog       
2006-01-18 00:39:15 UTC (rev 55704)
+++ trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/ChangeLog       
2006-01-18 02:26:21 UTC (rev 55705)
@@ -1,8 +1,9 @@
 2006-01-17  Cesar Lopez Nataren  <[EMAIL PROTECTED]>
 
+       * Parser.cs: Propagate the proper parent.  Fixes #75166.
+
        * ast.cs: Added virtual method PropagateParent for recovering a
-       lost parent or set it up properly if previously set to null. Fixes
-       #75166.
+       lost parent or set it up properly if previously set to null.
 
        * Statement.cs (If,Jump,Break.PropagateParent): recover
        the proper parent.

Modified: trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/Parser.cs
===================================================================
--- trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/Parser.cs       
2006-01-18 00:39:15 UTC (rev 55704)
+++ trunk/mcs/class/Microsoft.JScript/Microsoft.JScript/Parser.cs       
2006-01-18 02:26:21 UTC (rev 55705)
@@ -639,7 +639,7 @@
                                        pn = new ForIn (parent, init, cond, 
body, new Location (ts.SourceName, ts.LineNumber));
                                else
                                        pn = new For (parent, init, cond, incr, 
body, new Location (ts.SourceName, ts.LineNumber));
-                               body.parent = pn;
+                               body.PropagateParent (pn);
                        } else if (tt == Token.TRY) {
                                int line_number = ts.LineNumber;
                                AST try_block;

_______________________________________________
Mono-patches maillist  -  [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches

Reply via email to