diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2014-02-11 12:35:03 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2014-02-11 12:35:03 +1100 |
| commit | 8b2a36040a58f6dce12866537a3110d11ab4ba9b (patch) | |
| tree | 219720c7bc8e3e449eeea50e774fe369f77b39e0 | |
| parent | 52a0e5e018d566de63f194ec879781f5311847a3 (diff) | |
Fixed error with Thue rule parsing
| -rw-r--r-- | Thue/Parser.hs | 3 |
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:" |