Permalink
Browse files

Fix bug in initial files templates.

  • Loading branch information...
serras committed Aug 24, 2011
1 parent b858596 commit f6d73a3acf17bf0b642544e6f556e5a0ce5e4b30
@@ -14,7 +14,7 @@ main :: IO ()
main = print (show test)
testTree :: Tree
-testTree = Node (Tip 1) (Node (Tip 2) (Tip 3))
+testTree = Tree_Node (Tree_Tip 1) (Tree_Node (Tree_Tip 2) (Tree_Tip 3))
test :: Int
test = sem_Tree testTree
@@ -16,7 +16,7 @@ main :: IO ()
main = print (show test)
testTree :: Tree
-testTree = Node (Tip 1) (Node (Tip 2) (Tip 3))
+testTree = Tree_Node (Tree_Tip 1) (Tree_Node (Tree_Tip 2) (Tree_Tip 3))
test :: Int
test = sem_Tree testTree

0 comments on commit f6d73a3

Please sign in to comment.