[svn] r6863: nemerle/trunk/ncc/testsuite/positive/infer.n

[nazgul]

Log:
Add testcase for 734

Author: nazgul
Date: Fri Nov 10 19:32:06 2006
New Revision: 6863

Modified:
   nemerle/trunk/ncc/testsuite/positive/infer.n

Modified: nemerle/trunk/ncc/testsuite/positive/infer.n
==============================================================================
--- nemerle/trunk/ncc/testsuite/positive/infer.n	(original)
+++ nemerle/trunk/ncc/testsuite/positive/infer.n	Fri Nov 10 19:32:06 2006
@@ -1,4 +1,5 @@
 using Nemerle.IO;
+
 module M {
   f1 (_ : object) : void {}
   
@@ -175,6 +176,27 @@
         }
 }
 
+public class Bug734 {
+    public foo () : void {
+       def merge_dict(to, from)
+       {
+         foreach(kv in from) {
+           def inner(to, from) {
+             foreach(kv in from) {
+               to[kv.Key] = kv.Value;
+             }
+           }
+           inner(to[kv.Key], kv.Value);
+         }
+       }
+       
+       def dict1 : System.Collections.Generic.Dictionary[string,System.Collections.Generic.Dictionary[string,string*string]] = System.Collections.Generic.Dictionary();
+       def dict2 : System.Collections.Generic.Dictionary[string,System.Collections.Generic.Dictionary[string,string*string]] = System.Collections.Generic.Dictionary();
+       merge_dict(dict1, dict2);        
+    }
+}
+
+
 /*
 BEGIN-OUTPUT
 M+Set`1+A[System.Int32]