X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fmbas%2Ftree.cs;h=4f424cd820de88f5f8dbd6d2078c4fd3c7fa9c2a;hb=04ed9fb7a17756fe0fe25347981259c8aabb58b6;hp=2cf5be8ca5ccd62f38949affa188485e8866f9b0;hpb=8e7b3c27912386b74a7ae3e8d7c9b313406639f8;p=mono.git

diff --git a/mcs/mbas/tree.cs b/mcs/mbas/tree.cs
index 2cf5be8ca5c..4f424cd820d 100644
--- a/mcs/mbas/tree.cs
+++ b/mcs/mbas/tree.cs
@@ -15,7 +15,7 @@ using System.Reflection;
 using System.Reflection.Emit;
 using System.IO;
 
-namespace Mono.CSharp
+namespace Mono.MonoBASIC
 {
 
 	public interface ITreeDump {
@@ -45,7 +45,7 @@ namespace Mono.CSharp
 		
 		public Tree ()
 		{
-			root_types = new TypeContainer (null, "", new Location (-1));
+			root_types = new TypeContainer (null, "", null, new Location (-1, 0));
 
 			decls = new Hashtable ();
 			namespaces = new Hashtable ();
@@ -55,7 +55,7 @@ namespace Mono.CSharp
 		{
 			if (decls.Contains (name)){
 				Report.Error (
-					101, ds.Location,
+					30179, ds.Location,
 					"There is already a definition for `" + name + "'");
 				DeclSpace other = (DeclSpace) decls [name];
 				Report.Error (0,