[svn] r6046: nemerle/trunk/ncc: generation/HierarchyEmitter.n testsuite/positive/params-lib.n testsuite/po...

nazgul svnadmin at nemerle.org
Mon Jan 2 21:18:02 CET 2006


Log:
Emit custom attributes also for abstract methods

Author: nazgul
Date: Mon Jan  2 21:17:45 2006
New Revision: 6046

Added:
   nemerle/trunk/ncc/testsuite/positive/params-lib.n
Modified:
   nemerle/trunk/ncc/generation/HierarchyEmitter.n
   nemerle/trunk/ncc/testsuite/positive/params.n

Modified: nemerle/trunk/ncc/generation/HierarchyEmitter.n
==============================================================================
--- nemerle/trunk/ncc/generation/HierarchyEmitter.n	(original)
+++ nemerle/trunk/ncc/generation/HierarchyEmitter.n	Mon Jan  2 21:17:45 2006
@@ -732,7 +732,8 @@
                   });
                 }
 
-              | FunBody.Abstract => ()
+              | FunBody.Abstract => 
+                  emit_parameter_attributes ();
             }
           });
 

Added: nemerle/trunk/ncc/testsuite/positive/params-lib.n
==============================================================================
--- (empty file)
+++ nemerle/trunk/ncc/testsuite/positive/params-lib.n	Mon Jan  2 21:17:45 2006
@@ -0,0 +1,9 @@
+public interface IExternal {
+   Invok (params x : array [object]) : void;
+}
+
+public class External : IExternal {
+   public Invok (params _x : array [object]) : void {
+     System.Console.WriteLine (_x.Length);
+   }
+}

Modified: nemerle/trunk/ncc/testsuite/positive/params.n
==============================================================================
--- nemerle/trunk/ncc/testsuite/positive/params.n	(original)
+++ nemerle/trunk/ncc/testsuite/positive/params.n	Mon Jan  2 21:17:45 2006
@@ -1,3 +1,5 @@
+// REFERENCE: params-lib.dll
+
 module P {
   sum (params x : array [int]) : int {
     mutable s = 0;
@@ -43,6 +45,9 @@
                                 4, 5, 6, null, "osiem", sum ("4", "2", "foo"));
     System.Console.WriteLine (sum ("s"));
     local_mut (1,2,3);
+    
+    def x = External() : IExternal;
+    x.Invok ("a", 1);
   }
 }
 
@@ -53,5 +58,6 @@
 2 2 2
 8
 9
+2
 END-OUTPUT
 */



More information about the svn mailing list