Mercurial > hg > Members > toma > Jungle-haskell

diff test/test.hs @ 20:97d1e67aef15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add STM in Jungle map
author Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
date Fri, 24 Jan 2014 06:06:30 +0900
parents 824543aea6fc
children
line wrap: on
line diff
--- a/test/test.hs	Fri Jan 24 00:15:31 2014 +0900
+++ b/test/test.hs	Fri Jan 24 06:06:30 2014 +0900
@@ -5,7 +5,8 @@
 import qualified Data.ByteString.Lazy.Char8 as B
 
 tree = do
-    jungle <- createTree createJungle "test"
+    jungle <- createJungle
+    createTree jungle "test"
     node <- getRootNode jungle "test"
     return (add node)