Add lexer support for comments.

2011-01-13 11:26:47 -08:00
parent 5d0a3fc510
commit bd16ce00f2
2 changed files with 3 additions and 2 deletions
--- a/hsrc/Syntax/Lexer.x
+++ b/hsrc/Syntax/Lexer.x
@@ -21,14 +21,14 @@ $bindigit = [01]
 $typestart   = [A-Z\_]
 $valstart    = [a-z\_]
 $identrest   = [a-zA-Z0-9\_\.]
-$opident     = [\~\!\@\#\$\%\^\&\*\+\-\=\.\:\<\>\?\/\_]
+$opident     = [\~\!\@\#\$\%\^\&\*\+\-\=\.\:\<\>\?\_]
 $escape_char = [abfnrtv'\"\\]

 :-

 -- Whitespace
  $white+                              ;
-  "--".*                               ;
+  "/*".*"*/"                                 ;

 -- Numbers
  $decdigit+                                       { emitS (buildInt 10)  }