[svn] r6811: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Type.n

[pbludov]

Log:
Changes in GotoInfo

Author: pbludov
Date: Mon Oct 30 09:50:33 2006
New Revision: 6811

Modified:
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Type.n

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Type.n
==============================================================================
--- vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Type.n	(original)
+++ vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Type.n	Mon Oct 30 09:50:33 2006
@@ -154,11 +154,15 @@
       {
       | me is TExpr.MacroEnvelope  => (GotoInfo(me))
       | lv is LocalValue           => (GotoInfo(lv))
-      | mm is IMember              => (GotoInfo(mm))
       | tv is TyVar                => (GotoInfo(tv))
       | fh is Typedtree.Fun_header => (GotoInfo(fh))
-      | fb is FieldBuilder         => (GotoInfo(fb))
+      | fb is FieldBuilder         =>
+        if (fb.Ast.ty.Location.Contains(line, col))
+          (GotoInfo(fb.GetMemType()))
+        else 
+          (GotoInfo(fb))
       | pb is PropertyBuilder      => (GotoInfo(pb))
+      | mm is IMember              => (GotoInfo(mm))
       | tb is TypeBuilder          => (GotoInfo(tb))
       | _                          => (null)
       }