* statement.cs (Block.CloneTo): Clone Toplevel field too.

svn path=/trunk/mcs/; revision=77647

diff --git a/mcs/mcs/ChangeLog b/mcs/mcs/ChangeLog
index 268e7300aa8549aa5d14740ac46d5d936a9afed7..0452c3f0108a58a9175054b06d05b6035626b1cd 100644 (file)
--- a/mcs/mcs/ChangeLog
+++ b/mcs/mcs/ChangeLog
@@ -1,5 +1,7 @@
 2007-05-18  Raja R Harinath  <rharinath@novell.com>
 
+       * statement.cs (Block.CloneTo): Clone Toplevel field too.
+
        * expression.cs (ParameterReference): Distinguish between block
        where parameter was referenced and declared.
 

diff --git a/mcs/mcs/statement.cs b/mcs/mcs/statement.cs
index 382b8feb96ecb52b6bdb604aecfe759da421ca18..4e7eba4e90f4a3351b1c54fdb134bc9a867398e9 100644 (file)
--- a/mcs/mcs/statement.cs
+++ b/mcs/mcs/statement.cs
@@ -1441,7 +1441,7 @@ namespace Mono.CSharp {
                public readonly Location  StartLocation;
                public Location EndLocation = Location.Null;
 
-               public readonly ToplevelBlock Toplevel;
+               public ToplevelBlock Toplevel;
 
                [Flags]
                public enum Flags : ushort {
@@ -2428,6 +2428,7 @@ namespace Mono.CSharp {
                {
                        Block target = (Block) t;
 
+                       target.Toplevel = (ToplevelBlock) clonectx.LookupBlock (Toplevel);
                        if (Parent != null)
                                target.Parent = clonectx.LookupBlock (Parent);