[svn] r7657: nemerle/trunk/ncc/hierarchy/GlobalEnv.n

[VladD2]

Log:
Fix bug 1009 - Incorrect type lookup if exists type with and without type parameters  (http://nemerle.org/bugs/view.php?id=1009)

Author: VladD2
Date: Sat May  5 15:41:47 2007
New Revision: 7657

Modified:
   nemerle/trunk/ncc/hierarchy/GlobalEnv.n

Modified: nemerle/trunk/ncc/hierarchy/GlobalEnv.n
==============================================================================
--- nemerle/trunk/ncc/hierarchy/GlobalEnv.n	(original)
+++ nemerle/trunk/ncc/hierarchy/GlobalEnv.n	Sat May  5 15:41:47 2007
@@ -307,13 +307,13 @@
         // (type_node is non-null when searching them in code below)
         // they are already correctly added in add_members_from
         when (type_node == null || !type_part.IsEmpty)
-          match (pref.LookupType (type_part, -1)) {
-            | Some (t) => acc = add_members_from (t, acc)
-            | _ => ()
-          };
+          foreach (ti in pref.LookupTypes (type_part))
+            acc = add_members_from (ti, acc);
+
         foreach (t : IMember in pref.LookupTypes (name, for_completion))
           when (!List.ContainsRef (acc, t))
             acc ::= t;
+
         acc
       };
       mutable result = List.FoldLeft (nameTree.namespace_tree :: open_namespaces, [], lookup_members);