1 files changed, 7 insertions, 0 deletions
diff --git a/src/ast.c b/src/ast.c
index a2a7bb5..e1a8e6c 100644
--- a/src/ast.c
+++ b/src/ast.c
@@ -57,3 +57,10 @@ ast_t *init_ast_function(ast_t *car, ast_t *cdr) {
   a->cdr = cdr;
   return a;
 }
+
+ast_t *init_ast_root(ast_t **subnodes, int size) {
+  ast_t *a = init_ast(AST_ROOT);
+  a->subnodes = subnodes;
+  a->root_size = size;
+  return a;
+}