summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Thue/Parser.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Thue/Parser.hs b/Thue/Parser.hs
index d9db99d..d7b0719 100644
--- a/Thue/Parser.hs
+++ b/Thue/Parser.hs
@@ -6,6 +6,7 @@ module Thue.Parser (
parseThue
) where
+import Control.Applicative( some )
import Text.ParserCombinators.Parsec
@@ -56,7 +57,7 @@ initialState = do
return (concat s)
-ruleState = many ruleStateChar
+ruleState = some ruleStateChar
ruleStateChar = noneOf "\n\r:"