changeset 14:9df5178e867c

merge
author Daichi TOMA <toma@cr.ie.u-ryukyu.ac.jp>
date Wed, 22 Jan 2014 14:23:29 +0900
parents 74a4c7cdc50b (diff) d6e95f88cda9 (current diff)
children 3337ccc824a4
files
diffstat 1 files changed, 2 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/test/test.hs	Wed Jan 22 12:46:34 2014 +0900
+++ b/test/test.hs	Wed Jan 22 14:23:29 2014 +0900
@@ -4,11 +4,9 @@
 import Data.Maybe
 import qualified Data.ByteString.Lazy.Char8 as B
 
-jungle = createJungle
-
 tree = do
-    a <- createTree jungle "test"
-    node <- getRootNode a "test"
+    jungle <- createTree createJungle "test"
+    node <- getRootNode jungle "test"
     return (add node)
 
 addc path pos node = addNewChildAt node path pos