added some samples

[ekitaihs.git] / Ekitai.hs

diff --git a/Ekitai.hs b/Ekitai.hs
index 6b9806f..9e416e1 100644 (file)
--- a/Ekitai.hs
+++ b/Ekitai.hs
@@ -29,7 +29,7 @@ main = do
     -- putStrLn $ show $ stringToSim contents
     initialState <- buildInitialState $ stringToSim contents
     endState <- B.defaultMain ekitaiApp initialState
-    print endState
+    -- print endState
     return 0
 
 -- main :: IO ()