module Main where
import Jungle
import qualified Data.ByteString.Char8 as C


x = createTree createJungle "new_tree"
tree = getTreeByName x "new_tree"
new_tree = addNewChildAt tree [] 0 Empty
new_tree2 = putAttribute tree [] "key" (C.pack "value")


main = do print $ createJungle
          print x
          print $ getTreeByName x "new_tree"
          print new_tree
          print new_tree2