Refactor code
[darcs-mirror-sem_syn.git] / SemSyn.hs
index 40543df..4081151 100644 (file)
--- a/SemSyn.hs
+++ b/SemSyn.hs
@@ -39,8 +39,10 @@ data Config
 
 data ExecMode 
     = Normal | Shapify | ShapifyPlus | Help | Debug 
+    deriving (Eq, Read, Show)
 
 data OutputMode = PseudoCode | HaskellCode | ForwardCode
+    deriving (Eq, Read, Show)
 
 defaultConfig = Config { 
                   inputFile   = Nothing,