2003-04-17 Zoltan Varga <vargaz@freemail.hu>

	* TypeBuilder.cs (CreateType): Avoid creating a default constructor
	for the global type.

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

diff --git a/mcs/class/corlib/System.Reflection.Emit/ChangeLog b/mcs/class/corlib/System.Reflection.Emit/ChangeLog
index ceab5cc8d216e93bb120e41dbbef48996461fca1..1f5ed5681993ff140471df5766252565b3c5e602 100644 (file)
--- a/mcs/class/corlib/System.Reflection.Emit/ChangeLog
+++ b/mcs/class/corlib/System.Reflection.Emit/ChangeLog
@@ -1,3 +1,8 @@
+2003-04-17  Zoltan Varga  <vargaz@freemail.hu>
+
+       * TypeBuilder.cs (CreateType): Avoid creating a default constructor
+       for the global type.
+
 2003-04-15  Miguel de Icaza  <miguel@ximian.com>
 
        * TypeBuilder.cs (DefineDefaultConstructor): Make it generate code

diff --git a/mcs/class/corlib/System.Reflection.Emit/TypeBuilder.cs b/mcs/class/corlib/System.Reflection.Emit/TypeBuilder.cs
index efdb0ca88747b90dc5c8d5f6054d45be4b4d938a..e864ec76b44bdef31a091660afaf35d35400515a 100644 (file)
--- a/mcs/class/corlib/System.Reflection.Emit/TypeBuilder.cs
+++ b/mcs/class/corlib/System.Reflection.Emit/TypeBuilder.cs
@@ -463,7 +463,7 @@ namespace System.Reflection.Emit {
                        //
                        // On classes, define a default constructor if not provided
                        //
-                       if (!(IsInterface || IsValueType) && ctors == null)
+                       if (!(IsInterface || IsValueType) && (ctors == null) && (tname != "<Module>"))
                                DefineDefaultConstructor (MethodAttributes.Public);
 
                        if (ctors != null){