Fix bug in initial files templates.

JPMoresmau · Aug 24, 2011 · f6d73a3 · f6d73a3
1 parent b858596
commit f6d73a3
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/net.sf.eclipsefp.haskell.ui/newFiles/uuagc-haskell.ag b/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

diff --git a/net.sf.eclipsefp.haskell.ui/newFiles/uuagc.ag b/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