[svn] r6241: nemerle/trunk/ncc/hierarchy/NamespaceTree.n

[malekith]

Log:
Better error message for unbound internal type.

Author: malekith
Date: Sun May  7 20:27:43 2006
New Revision: 6241

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

Modified: nemerle/trunk/ncc/hierarchy/NamespaceTree.n
==============================================================================
--- nemerle/trunk/ncc/hierarchy/NamespaceTree.n	(original)
+++ nemerle/trunk/ncc/hierarchy/NamespaceTree.n	Sun May  7 20:27:43 2006
@@ -477,7 +477,8 @@
     internal LookupInternalType (name : list[string], args_count : int) : TypeInfo {
       match (LookupExactType (name, args_count)) {
         | Some (t) => t
-        | None => Util.ice ("unbound internal type " + name.ToString (".") + args_count.ToString ())
+        | None => Util.ice ("unbound internal type " + name.ToString (".") + "`" + 
+                            args_count.ToString ())
       }
     }