Changed default outputMode to HaskellCode
authorKazutaka Matsuda <kztk@kb.ecei.tohoku.ac.jp>
Mon, 6 Sep 2010 13:23:52 +0000 (13:23 +0000)
committerKazutaka Matsuda <kztk@kb.ecei.tohoku.ac.jp>
Mon, 6 Sep 2010 13:23:52 +0000 (13:23 +0000)
SemSyn.hs

index e5b60c6..1810dc1 100644 (file)
--- a/SemSyn.hs
+++ b/SemSyn.hs
@@ -47,10 +47,9 @@ data OutputMode = PseudoCode | HaskellCode | ForwardCode
 defaultConfig = Config { 
                   inputFile   = Nothing, 
                   execMode    = Normal, 
-                  outputMode  = PseudoCode,
+                  outputMode  = HaskellCode,
                   isShowType  = True  }
 
-
 outputCode :: Config -> Bool -> AST -> AST -> Doc
 outputCode conf isShapify orig ast =
     let (p1,p2,p3) = constructBwdFunction ast