diff --git a/collects/tests/syntax-color/scheme-lexer.ss b/collects/tests/syntax-color/scheme-lexer.ss
index 8f2ce2fd9a..7f3f6ebfa2 100644
--- a/collects/tests/syntax-color/scheme-lexer.ss
+++ b/collects/tests/syntax-color/scheme-lexer.ss
@@ -446,85 +446,85 @@ end-string
 (test "#x1d+2" "xxxxxx")
 
 ;; Keywords
-(test "#:" "cc")
-(test "#:a#:a" "cccccc")
-(test "#:a #:a" "ccc ccc")
-(test "#:a\t#:a" "ccc ccc")
-(test "#:a\n#:a" "ccc ccc")
-(test "#:a\"#:a" "cccxxxx")
-(test "#:a,#:a" "cccoccc")
-(test "#:a'#:a" "ccccccc" 3)
-(test "#:a`#:a" "ccccccc" 3)
-(test "#:a;#:a" "ccc;;;;")
-(test "#:a(#:a" "cccpccc")
-(test "#:a)#:a" "cccpccc")
-(test "#:a[#:a" "cccpccc")
-(test "#:a]#:a" "cccpccc")
-(test "#:a{#:a" "cccpccc")
-(test "#:a}#:a" "cccpccc")
-(test "#:a##:a" "ccccccc")
-(test "#:a.#:a" "ccccccc")
-(test "#:a@#:a" "ccccccc")
-(test "#:a/#:a" "ccccccc")
-(test "#:a\"#:a\"#:a" "cccsssssccc")
-(test "#:a1#:a" "ccccccc")
-(test "#:a%#:a" "ccccccc")
+(test "#:" "pp")
+(test "#:a#:a" "pppppp")
+(test "#:a #:a" "ppp ppp")
+(test "#:a\t#:a" "ppp ppp")
+(test "#:a\n#:a" "ppp ppp")
+(test "#:a\"#:a" "pppxxxx")
+(test "#:a,#:a" "pppoppp")
+(test "#:a'#:a" "pppcppp" 3)
+(test "#:a`#:a" "pppcppp" 3)
+(test "#:a;#:a" "ppp;;;;")
+(test "#:a(#:a" "ppppppp" 3)
+(test "#:a)#:a" "ppppppp" 3)
+(test "#:a[#:a" "ppppppp" 3)
+(test "#:a]#:a" "ppppppp" 3)
+(test "#:a{#:a" "ppppppp" 3)
+(test "#:a}#:a" "ppppppp" 3)
+(test "#:a##:a" "ppppppp")
+(test "#:a.#:a" "ppppppp")
+(test "#:a@#:a" "ppppppp")
+(test "#:a/#:a" "ppppppp")
+(test "#:a\"#:a\"#:a" "pppsssssppp")
+(test "#:a1#:a" "ppppppp")
+(test "#:a%#:a" "ppppppp")
 
-(test "#:1a" "cccc")
-(test "#:\\8" "cccc")
-(test "#:\\a" "cccc")
-(test "#:\\\\" "cccc")
-(test "#:a\\ a" "cccccc")
-(test "#:a\\\ta" "cccccc")
-(test "#:a\\\na" "cccccc")
-(test "#:a\\\"a" "cccccc")
-(test "#:a\\,a" "cccccc")
-(test "#:a\\'a" "cccccc")
-(test "#:a\\`a" "cccccc")
-(test "#:a\\;a" "cccccc")
-(test "#:a\\(a" "cccccc")
-(test "#:a\\)a" "cccccc")
-(test "#:a\\[a" "cccccc")
-(test "#:a\\]a" "cccccc")
-(test "#:a\\{a" "cccccc")
-(test "#:a\\}a" "cccccc")
-(test "#:\\|" "cccc")
-(test "#:a\\|a" "cccccc")
+(test "#:1a" "pppp")
+(test "#:\\8" "pppp")
+(test "#:\\a" "pppp")
+(test "#:\\\\" "pppp")
+(test "#:a\\ a" "pppppp")
+(test "#:a\\\ta" "pppppp")
+(test "#:a\\\na" "pppppp")
+(test "#:a\\\"a" "pppppp")
+(test "#:a\\,a" "pppppp")
+(test "#:a\\'a" "pppppp")
+(test "#:a\\`a" "pppppp")
+(test "#:a\\;a" "pppppp")
+(test "#:a\\(a" "pppppp")
+(test "#:a\\)a" "pppppp")
+(test "#:a\\[a" "pppppp")
+(test "#:a\\]a" "pppppp")
+(test "#:a\\{a" "pppppp")
+(test "#:a\\}a" "pppppp")
+(test "#:\\|" "pppp")
+(test "#:a\\|a" "pppppp")
 (test #<<end-string
 #:\ \8\ \a\\
 end-string
-      "cccccccccccc")
-(test "#:||" "cccc")
-(test "#:|a|" "ccccc")
-(test "#:|8|" "ccccc")
-(test "#:|\\|" "ccccc")
-(test "#:a| |a" "ccccccc")
-(test "#:a|\t|a" "ccccccc")
-(test "#:a|\n|a" "ccccccc")
-(test "#:a|\"|a" "ccccccc")
-(test "#:a|,|a" "ccccccc")
-(test "#:a|'|a" "ccccccc")
-(test "#:a|`|a" "ccccccc")
-(test "#:a|;|a" "ccccccc")
-(test "#:a|(|a" "ccccccc")
-(test "#:a|)|a" "ccccccc")
-(test "#:a|[|a" "ccccccc")
-(test "#:a|]|a" "ccccccc")
-(test "#:a|{|a" "ccccccc")
-(test "#:a|}|a" "ccccccc")
-(test "#:a|,|\\ |||\\|| se \\|\\\\|\\\\|" "cccccccccccccccccccccccccc")
-(test "#:\\ ,#:a" "ccccoccc")
-(test "#:| |a,#:a" "ccccccoccc")
-(test "#:a#||#" "ccccccc")
-(test "#:a#;1 2" "cccc;;;;")
-(test "#:a#<<a" "ccccccc")
-(test "#:1#!1" "cccccc")
-(test "#:1+nan.0" "ccccccccc")
-(test "#:-inf.0+1" "cccccccccc")
-(test "#:\\#:a" "cccccc")
-(test "#:#\\:a" "cccccc")
+      "pppppppppppp")
+(test "#:||" "pppp")
+(test "#:|a|" "ppppp")
+(test "#:|8|" "ppppp")
+(test "#:|\\|" "ppppp")
+(test "#:a| |a" "ppppppp")
+(test "#:a|\t|a" "ppppppp")
+(test "#:a|\n|a" "ppppppp")
+(test "#:a|\"|a" "ppppppp")
+(test "#:a|,|a" "ppppppp")
+(test "#:a|'|a" "ppppppp")
+(test "#:a|`|a" "ppppppp")
+(test "#:a|;|a" "ppppppp")
+(test "#:a|(|a" "ppppppp")
+(test "#:a|)|a" "ppppppp")
+(test "#:a|[|a" "ppppppp")
+(test "#:a|]|a" "ppppppp")
+(test "#:a|{|a" "ppppppp")
+(test "#:a|}|a" "ppppppp")
+(test "#:a|,|\\ |||\\|| se \\|\\\\|\\\\|" "pppppppppppppppppppppppppp")
+(test "#:\\ ,#:a" "ppppoppp")
+(test "#:| |a,#:a" "ppppppoppp")
+(test "#:a#||#" "ppppppp")
+(test "#:a#;1 2" "pppp;;;;")
+(test "#:a#<<a" "ppppppp")
+(test "#:1#!1" "pppppp")
+(test "#:1+nan.0" "ppppppppp")
+(test "#:-inf.0+1" "pppppppppp")
+(test "#:\\#:a" "pppppp")
+(test "#:#\\:a" "pppppp")
 
-(test "#:1.1" "ccccc")
+(test "#:1.1" "ppppp")
 (test "#:a|" "xxxx")
 (test "#:a#|" "xxxxx")
 (test "#:a||a|, a\n\"" "xxxxxxxxxxxx")