[svn] r5924: nemerle/trunk/ncc/typing/Typer.n

[malekith]

Log:
Add a hack for proper error message when accessing member from ambigious functional values (which happen to be constructors most of the time).

Author: malekith
Date: Wed Nov  9 19:16:36 2005
New Revision: 5924

Modified:
   nemerle/trunk/ncc/typing/Typer.n

Modified: nemerle/trunk/ncc/typing/Typer.n
==============================================================================
--- nemerle/trunk/ncc/typing/Typer.n	(original)
+++ nemerle/trunk/ncc/typing/Typer.n	Wed Nov  9 19:16:36 2005
@@ -1201,6 +1201,9 @@
                 if (IsError (obj))
                   TypeName (expression, expected)
                 else if (IsFunctional (obj)) {
+                  if (InternalType.Object_tc.LookupMember (mem_name) is [])
+                    TypeName (expression, expected)
+                  else
                   if (messenger.InErrorMode) {
                     def e = TryTyping (fun () { TypeMemberExpr (obj, mem_name, expected) });
                     if (IsError (e))