Skip to content
Browse files

Fix bug in initial files templates.

  • Loading branch information...
1 parent b858596 commit f6d73a3acf17bf0b642544e6f556e5a0ce5e4b30 @serras serras committed
View
2 net.sf.eclipsefp.haskell.ui/newFiles/uuagc-haskell.ag
@@ -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
View
2 net.sf.eclipsefp.haskell.ui/newFiles/uuagc.ag
@@ -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.
Something went wrong with that request. Please try again.