Added missing "_" character to the lexer nmstart rule github #7

AccelerationNet · Apr 8, 2013 · 47e66af · 47e66af
1 parent c199af7
commit 47e66af
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/src/css3.lex b/src/css3.lex
@@ -1,7 +1,7 @@
 %option case-insensitive
 
 h		[0-9a-f]
-nmstart		[a-z]
+nmstart		[_a-z]
 nmchar		[a-z0-9-_]
 nl		\n|\r\n|\r|\f
 string1		\"([\t !#$%&(-~]|\\{nl}|\')*\"

diff --git a/test/parse.lisp b/test/parse.lisp
@@ -39,7 +39,9 @@
 
 (deftest parse-underscores (parse)
   (assert-equal '(:class "foo-bar_bast")
-   (css::parse-results " .foo-bar_bast ")))
+   (css::parse-results " .foo-bar_bast "))
+  (assert-equal '(:class "_foo")
+   (css::parse-results " ._foo ")))
 
 (deftest nth-x-pseudo (parse)
   (assert-equal