diff --git a/vvp/lexor.lex b/vvp/lexor.lex
index 7a76d87d4..c85f72059 100644
--- a/vvp/lexor.lex
+++ b/vvp/lexor.lex
@@ -187,23 +187,37 @@
 
   /* Symbols are pretty much what is left. They are used to refer to
      labels so the rule must match a string that a label would match. */
-[.$_a-zA-Z\\][.$_a-zA-Z\\0-9<>/]* {
+[.$_a-zA-Z\\][.$_a-zA-Z\\0-9/]* {
       yylval.text = strdup(yytext);
       assert(yylval.text);
       return T_SYMBOL; }
 
-  /* Symbols may include comma `,' in certain constructs */
+  /* Handle some specialized constant/literals as symbols. */
 
-[A-Z]"<"[.$_a-zA-Z0-9/,]*">" {
+"C4<"[01xz]*">" {
       yylval.text = strdup(yytext);
       assert(yylval.text);
       return T_SYMBOL; }
 
-"Cr<m"[a-f0-9]*"x"[a-f0-9]*">" {
+"C8<"[01234567xz]*">" {
       yylval.text = strdup(yytext);
       assert(yylval.text);
       return T_SYMBOL; }
 
+"Cr<m"[a-f0-9]*"g"[a-f0-9]*">" {
+      yylval.text = strdup(yytext);
+      assert(yylval.text);
+      return T_SYMBOL; }
+
+"T<"[0-9]*","[0-9]*","[us]">" {
+      yylval.text = strdup(yytext);
+      assert(yylval.text);
+      return T_SYMBOL; }
+
+"W<"[0-9]*","[r]">" {
+      yylval.text = strdup(yytext);
+      assert(yylval.text);
+      return T_SYMBOL; }
 
   /* Accept the common assembler style comments, treat them as white
      space. Of course, also skip white space. The semi-colon is