diff options
| -rw-r--r-- | Fractran/Parser.hs | 2 | ||||
| -rw-r--r-- | Thue/Parser.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/Fractran/Parser.hs b/Fractran/Parser.hs index f4a793b..576f8a0 100644 --- a/Fractran/Parser.hs +++ b/Fractran/Parser.hs @@ -12,7 +12,7 @@ import Text.ParserCombinators.Parsec data FractranProgram = FractranProgram { fractions :: [(Int,Int)] , initialValue :: Int } - deriving (Show) + deriving (Show, Eq) diff --git a/Thue/Parser.hs b/Thue/Parser.hs index 948035d..d9db99d 100644 --- a/Thue/Parser.hs +++ b/Thue/Parser.hs @@ -12,7 +12,7 @@ import Text.ParserCombinators.Parsec data ThueProgram = ThueProgram { thueRules :: [ThueRule] , thueInitialState :: ThueState } - deriving (Show) + deriving (Show, Eq) data ThueRule = ThueRule { original :: ThueState |