[svn] r6951: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel: ExprFinder.n QuickTipIn...

[IT]

Log:
Colorizing for 'list'.

Author: IT
Date: Sun Nov 19 05:43:16 2006
New Revision: 6951

Modified:
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ExprFinder.n
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/QuickTipInfo.n
   vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ScanLexer.n

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/ExprFinder.n
==============================================================================

Modified: vs-plugin/trunk/Nemerle.Compiler.Utils/Nemerle.Completion2/CodeModel/QuickTipInfo.n
==============================================================================

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	Sun Nov 19 05:43:16 2006
@@ -49,16 +49,17 @@
 
     _tokenInfo : ScanTokenInfo = ScanTokenInfo();
 
-    static _types          : Dictionary[string,string] = Dictionary();
+    static _keywords       : Dictionary[string,string] = Dictionary();
     static _quotationTypes : Dictionary[string,string] = Dictionary();
 
     static this()
     {
       foreach (name in 
         ["object",  "bool", "byte",  "float", "uint",   "char", "ulong",  "ushort",
-         "decimal", "int",  "sbyte", "short", "double", "long", "string", "void", "get", "set"])
+         "decimal", "int",  "sbyte", "short", "double", "long", "string", "void",
+         "get", "set", "list"])
       {
-        _types.Add(name, name);
+        _keywords.Add(name, name);
       }
 
       foreach (name in ["ttype",  "fundecl", "case",  "parameter", "decl"])
@@ -399,7 +400,7 @@
 
         def (tp, color, trigger) = match (tok)
         {
-        | Identifier(nm) when _types.ContainsKey(nm)
+        | Identifier(nm) when _keywords.ContainsKey(nm)
         | Keyword                   => (TP.Keyword,    C.Keyword,    TR.None)
         | Identifier(name)          =>