[svn] r7091: nemerle/trunk/ncc: misc/PrettyPrint.n parsing/Lexer.n

[VladD2]

Log:
Change text representation of completion token. 

Author: VladD2
Date: Fri Dec 15 11:00:30 2006
New Revision: 7091

Modified:
   nemerle/trunk/ncc/misc/PrettyPrint.n
   nemerle/trunk/ncc/parsing/Lexer.n

Modified: nemerle/trunk/ncc/misc/PrettyPrint.n
==============================================================================
--- nemerle/trunk/ncc/misc/PrettyPrint.n	(original)
+++ nemerle/trunk/ncc/misc/PrettyPrint.n	Fri Dec 15 11:00:30 2006
@@ -100,8 +100,7 @@
             acc.Write ("$(");
             SprintExpr (ctx, e, indentation, acc);
             acc.Write (")");
-          | Splicable.HalfId (n) =>
-            acc.Write (n.Id + "<COMPL>");
+          | Splicable.HalfId (n) => acc.Write ($"<COMPLETE '$(n.Id)'>");
         }
       }
 
@@ -397,7 +396,7 @@
           }
 
         | PExpr.ToComplete (n) =>
-          acc.Write (n.Id + "<COMPL>");
+          acc.Write ($"<COMPLETE '$(n.Id)'>");
 
         | PExpr.Spliced (e) =>
           acc.Write ("$("); SprintExpr (ctx, e, indentation, acc); acc.Write (")");

Modified: nemerle/trunk/ncc/parsing/Lexer.n
==============================================================================
--- nemerle/trunk/ncc/parsing/Lexer.n	(original)
+++ nemerle/trunk/ncc/parsing/Lexer.n	Fri Dec 15 11:00:30 2006
@@ -92,7 +92,7 @@
     match (this) {
       | QuotedIdentifier (name) => "@" + name
       | Identifier (name) => name
-      | IdentifierToComplete (name) => name + "<COMPL>";
+      | IdentifierToComplete (name) => $"<COMPLETE '$name'>";
       | Keyword (name) => name
       | Operator (name : string) => name