Fixed lola formula parsing of identifiers

src/Main.hs

@@ -137,7 +137,6 @@ checkFile parser verbosity refine implicitProperties file = do
                 "Places: " ++ show (length  $ places net) ++ "\n" ++
                 "Transitions: " ++ show (length $ transitions net)
         addedProperties <- mapM (makeImplicitProperty net) implicitProperties
-        print properties
         rs <- mapM (checkProperty verbosity net refine)
                   (addedProperties ++ properties)
         verbosePut verbosity 0 ""

src/Parser/LOLAFormula.hs

@@ -18,8 +18,8 @@ languageDef =
                  Token.commentStart    = "{",
                  Token.commentEnd      = "}",
                  Token.commentLine     = "",
-                 Token.identStart      = noneOf ",;:(){}\t \n\r0123456789",
-                 Token.identLetter     = noneOf ",;:(){}\t \n\r0123456789",
+                 Token.identStart      = noneOf ",;:(){}\t \n\r0123456789-",
+                 Token.identLetter     = noneOf ",;:(){}\t \n\r",
                  Token.reservedNames   = ["FORMULA", "TRUE", "FALSE",
                                           "NOT", "AND", "OR"],
                  Token.reservedOpNames = ["<", "<=", "=", "!=", ">=", ">",