[svn] r7380: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2: CodeModel CodeModel/ScanLexer.n E...

[VladD2]

Log:
Autocomplet if ": " entered.

Author: VladD2
Date: Mon Feb  5 01:40:11 2007
New Revision: 7380

Modified:
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/   (props changed)
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ScanLexer.n
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/Engine/   (props changed)

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ScanLexer.n
==============================================================================
--- vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ScanLexer.n	(original)
+++ vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ScanLexer.n	Mon Feb  5 01:40:11 2007
@@ -653,14 +653,20 @@
             tok,
             TP.WhiteSpace,
             C.Text,
-            if (pos >= reader.Length && (tok :> Token.WhiteSpace).value == " ")
+            {
+              def tok2 = (tok :> Token.WhiteSpace).value;
+              if (pos >= reader.Length && tok2 == " ")
               match (_tokenInfo.Token)
               {
-              | Keyword ("override") | Keyword ("using") | Operator("|") => TR.MemberSelect
+                | Keyword ("override") | Keyword ("using") 
+                | Operator("|") | Operator(":")            => TR.MemberSelect
               | _                                                        => TR.None
               }
+              else if (tok2 == " " && _tokenInfo.Token is Operator(":"))
+                TR.MemberSelect
             else
               TR.None
+            }
           )
 
         | '#' when white_beginning =>