Permalink
Browse files

- is legal in symbols

  • Loading branch information...
1 parent 3e96f3f commit c0bbe1869646b012b3d66d86db5eb47b95aa8313 @nelhage committed Jul 29, 2008
Showing with 1 addition and 1 deletion.
  1. +1 −1 FLNV/Parser.hs
View
@@ -11,7 +11,7 @@ readExpr s = case parse sExpression "scheme" s of
Right val -> return val
symbolChar :: Parser Char
-symbolChar = oneOf "*!$?<>=/+:_{}#" <|> letter
+symbolChar = oneOf "*!$?<>=/+:_{}#-" <|> letter
parseSymbol :: Parser Expression
parseSymbol = do first <- symbolChar <?> "symbol"

0 comments on commit c0bbe18

Please sign in to comment.