From 8b2a36040a58f6dce12866537a3110d11ab4ba9b Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Tue, 11 Feb 2014 12:35:03 +1100 Subject: Fixed error with Thue rule parsing --- Thue/Parser.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Thue') 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:" -- cgit