From d275773bab11301f68e5c2f4055977de0ac49e89 Mon Sep 17 00:00:00 2001
From: darkf <lw9k123@gmail.com>
Date: Thu, 24 Oct 2013 00:17:21 -0700
Subject: [PATCH] add ' and ! to allowed identifier characters

---
 parser.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/parser.hs b/parser.hs
index c7f5d69..f124a64 100644
--- a/parser.hs
+++ b/parser.hs
@@ -16,7 +16,7 @@ languageDef = emptyDef {T.commentStart="{-",
 						  T.commentLine="--",
 						  T.nestedComments=True,
 						  T.identStart = letter <|> char '_',
-						  T.identLetter = alphaNum <|> char '_',
+						  T.identLetter = alphaNum <|> char '_' <|> char '\'' <|> char '!' <|> char '?',
 						  T.reservedNames = ["do", "end"],
 						  T.reservedOpNames = ["+", "-", "*", "/", "==", "!=", "<", ">"]}