Author: gert
Date: 2007-05-05 11:40:30 -0400 (Sat, 05 May 2007)
New Revision: 76744

Added:
   trunk/gert/standalone/bug81530/
   trunk/gert/standalone/bug81530/default.build
   trunk/gert/standalone/bug81530/test.cs
Log:
Added test for bug #81530.


Added: trunk/gert/standalone/bug81530/default.build
===================================================================
--- trunk/gert/standalone/bug81530/default.build        2007-05-05 15:26:55 UTC 
(rev 76743)
+++ trunk/gert/standalone/bug81530/default.build        2007-05-05 15:40:30 UTC 
(rev 76744)
@@ -0,0 +1,59 @@
+<project name="bug81530" default="rebuild">
+       <target name="mono-1.0">
+               <property name="csc.defines" 
value="NET_1_0,NET_1_1,ONLY_1_1,MONO" />
+       </target>
+
+       <target name="mono-2.0">
+               <property name="csc.defines" 
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0,MONO" />
+       </target>
+
+       <target name="net-1.1">
+               <property name="csc.defines" value="NET_1_0,NET_1_1,ONLY_1_1" />
+       </target>
+
+       <target name="net-2.0">
+               <property name="csc.defines" 
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0" />
+       </target>
+
+       <property name="frameworks" value="mono-1.0,net-1.1,mono-2.0,net-2.0" />
+               
+       <target name="clean">
+               <delete>
+                       <fileset>
+                               <include name="DummyAssembly.dll" />
+                               <include name="out" />
+                               <include name="test.exe" />
+                       </fileset>
+               </delete>
+       </target>
+
+       <target name="build">
+               <property name="original.targetframework" 
value="${nant.settings.currentframework}" />
+
+               <foreach property="framework" item="String" in="${frameworks}" 
delim=",">
+                       <if test="${framework::exists(framework)}">
+                               <property name="nant.settings.currentframework" 
value="${framework}" />
+                               <call 
target="${nant.settings.currentframework}" />
+                               <call target="run" />
+                               <call target="clean" />
+                       </if>
+               </foreach>
+
+               <property name="nant.settings.currentframework" 
value="${original.targetframework}" />
+       </target>
+
+       <target name="compile">
+               <csc target="exe" define="${csc.defines}" output="test.exe" 
warnaserror="true" warninglevel="4">
+                       <sources>
+                               <include name="test.cs" />
+                       </sources>
+               </csc>
+       </target>
+
+       <target name="run" depends="compile">
+               <exec program="test.exe" managed="true" output="out" />
+               <fail if="${file::exists('out')}" />
+       </target>
+
+       <target name="rebuild" depends="clean, build" />
+</project>


Property changes on: trunk/gert/standalone/bug81530/default.build
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug81530/test.cs
===================================================================
--- trunk/gert/standalone/bug81530/test.cs      2007-05-05 15:26:55 UTC (rev 
76743)
+++ trunk/gert/standalone/bug81530/test.cs      2007-05-05 15:40:30 UTC (rev 
76744)
@@ -0,0 +1,27 @@
+using System;
+using System.Reflection;
+using System.Reflection.Emit;
+
+class Program
+{
+       static int Main ()
+       {
+               AssemblyName aname = new AssemblyName ();
+               aname.Name = "DummyAssembly";
+               AssemblyBuilder lAssemblyBuilder = 
AppDomain.CurrentDomain.DefineDynamicAssembly (
+                       aname, AssemblyBuilderAccess.RunAndSave, 
AppDomain.CurrentDomain.BaseDirectory);
+               ModuleBuilder lModuleBuilder = 
lAssemblyBuilder.DefineDynamicModule (aname.Name, aname.Name + ".dll");
+               TypeAttributes lAttributes = TypeAttributes.Public | 
TypeAttributes.Class;
+               TypeBuilder lTypeBuilder = lModuleBuilder.DefineType ("Dummy." 
+ aname.Name, lAttributes, null);
+
+               lTypeBuilder.CreateType ();
+               lAssemblyBuilder.Save (aname.Name + ".dll");
+
+               Type t = Type.GetType ("Dummy.DummyAssembly,DummyAssembly", 
true);
+               if (t == null)
+                       return 1;
+               if (t.AssemblyQualifiedName != "Dummy.DummyAssembly, 
DummyAssembly, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null")
+                       return 2;
+               return 0;
+       }
+}


Property changes on: trunk/gert/standalone/bug81530/test.cs
___________________________________________________________________
Name: svn:eol-style
   + native

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

Reply via email to