Haskell ftw

1 files changed, 18 insertions, 0 deletions

diff --git a/src/Fun/Tree.hs b/src/Fun/Tree.hs
new file mode 100644
index 0000000..a7709ee
--- /dev/null
+++ b/src/Fun/Tree.hs
@@ -0,0 +1,18 @@
+module Fun.Tree where
+
+data Tree = Tree [Program]
+  deriving Show
+
+data Program = Program [Block]
+  deriving Show
+
+data Block = Block FunctionBlock -- | Block DataBlock ...
+  deriving Show
+data FunctionBlock = FunctionBlock FunctionDeclaration [FunctionDefinition]
+  deriving Show
+
+data FunctionDeclaration = FunctionDeclarationWithoutFlags String Char [String] | FunctionDeclarationWithFlags String Char [String] [String]
+  deriving Show
+
+data FunctionDefinition = FunctionDefinition String String
+  deriving Show