diff options
Diffstat (limited to 'Unlambda/Parser.hs')
| -rw-r--r-- | Unlambda/Parser.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/Unlambda/Parser.hs b/Unlambda/Parser.hs index 851fc01..59fc5e3 100644 --- a/Unlambda/Parser.hs +++ b/Unlambda/Parser.hs @@ -15,11 +15,7 @@ import Text.ParserCombinators.Parsec -type ULM a = ContT UnlambdaTerm (StateT UnlambdaState IO) a - -data UnlambdaState = UnlambdaState { exit :: UnlambdaTerm -> ULM UnlambdaTerm - , curChar :: Maybe Char } - +type ULM a = ContT UnlambdaTerm (StateT (Maybe Char) IO) a data UnlambdaTerm = S | K | I | V | R | D | C | E | Bar | Reed |