[svn] r7466: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2: CodeModel/GotoInfo.n CodeModel/Pr...

[phantom]

Log:
Work on function parameters.

Author: phantom
Date: Thu Feb 22 17:55:40 2007
New Revision: 7466

Modified:
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/GotoInfo.n
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Refactoring.n
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/Tests/Heavy.Tests/Runner.n

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/GotoInfo.n
==============================================================================
--- vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/GotoInfo.n	(original)
+++ vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/GotoInfo.n	Thu Feb 22 17:55:40 2007
@@ -115,6 +115,11 @@
     {
     }
 
+    public this(fp : Typedtree.Fun_parm)
+    {
+      this(fp.Location);
+    }
+
     public this(funHeader : Typedtree.Fun_header, usageType : UsageType)
     {
       this(funHeader);

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Refactoring.n
==============================================================================
--- vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Refactoring.n	(original)
+++ vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/Project.Refactoring.n	Thu Feb 22 17:55:40 2007
@@ -93,6 +93,7 @@
         // | mb is MethodBuilder when mb.Name == ".ctor" && mb.Ast.name.Location.IsGenerated with tb = mb.DeclaringType
         | tb is TypeBuilder                 => tb.AstParts.Map(GotoInfo);
         | fh is Typedtree.Fun_header        => [GotoInfo(fh)]
+        | fp is Typedtree.Fun_parm          => [GotoInfo(fp)]
         | m  is IMember                     => [GotoInfo(m)]
         | p  is Pattern.Enum                => [GotoInfo(p.fld)]
         | _                                 => []

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/Tests/Heavy.Tests/Runner.n
==============================================================================
--- vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/Tests/Heavy.Tests/Runner.n	(original)
+++ vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/Tests/Heavy.Tests/Runner.n	Thu Feb 22 17:55:40 2007
@@ -29,10 +29,10 @@
     
     public static RunTheTest() : void
     {
-      //def suite = FindDefinitionTestProjectTwo();
-      def suite = FindUsagesTestProjectTwo();
+      def suite = FindDefinitionTestProjectTwo();
+      //def suite = FindUsagesTestProjectTwo();
       suite.SetUp();
-      suite.Test045();
+      suite.Test043();
     }
 
     public static Explode(this s : string, delimiter : string) : list[string]