Added scope structures.

Not yet used in exec.c.

src/ast.c

@@ -2,7 +2,7 @@
 
 #include "include/ast.h"
 #include "include/dstr.h"
-#include "include/htab.h"
+#include "include/scope.h"
 #include "include/util.h"
 
 extern AST* root;
@@ -28,7 +28,7 @@ AST* ast_init(ASTType type, void* data) {
     return ast;
 }
 
-AST* ast_init_scope(ASTType type, void* data, HTab* scope) {
+AST* ast_init_scope(ASTType type, void* data, Scope* scope) {
     AST* ast = malloc(sizeof(AST));
 
     ast->type = type;
@@ -53,8 +53,8 @@ void ast_destroy(AST* ast) {
             log_dbgf("Unknown ast type %d (max: %d)", ast->type, AST_TYPE_MAX);
     }
 
+    scope_destroy_psv(ast->scope);
     free(ast);
-    htab_destroy(ast->scope);
 }
 
 void ast_print(AST* ast) { ast_print_i(ast, 0); }

src/exec.c

@@ -9,12 +9,11 @@
 #include "include/stack.h"
 #include "include/util.h"
 
-extern AST* root;
-
 AST* exec_find(char* name);
 
 AST* exec_start(AST* ast) {
     log_dbg("Started execution.");
+
     Stack* scope = stack_init();
 
     HTab* global = htab_init();

src/include/ast.h

@@ -2,6 +2,7 @@
 #define AST_H
 
 #include "htab.h"
+#include "scope.h"
 #include <stdlib.h>
 
 // The type of an `AST`.
@@ -32,13 +33,13 @@ typedef enum {
 typedef struct {
     ASTType type; // The type of the `AST`.
     void* data;   // The data of the `AST`.
-    HTab* scope;  // The scope of the `AST`.
+    Scope* scope; // The scope of the `AST`.
 } AST;
 
 // Create a new `AST`.
 AST* ast_init(ASTType type, void* data);
 // Create a new `AST` with a specified scope.
-AST* ast_init_scope(ASTType type, void* data, HTab* scope);
+AST* ast_init_scope(ASTType type, void* data, Scope* scope);
 // Destroy an `AST`, recursively.
 void ast_destroy(AST* ast);
 // Print an `AST`, recursively.

src/include/scope.h

@@ -0,0 +1,19 @@
+#ifndef SCOPE_H
+#define SCOPE_H
+
+#include "htab.h"
+
+// Represents the reverse linked tree of scope.
+typedef struct SCOPE_T {
+    HTab* here;
+    struct SCOPE_T* inherit;
+} Scope;
+
+// Create a new `Scope`.
+Scope* scope_init(HTab* here, Scope* inherit);
+// Destroy all linked `Scope`s this inherits from.
+void scope_destroy(Scope* scope);
+// Destroy the current `Scope` only.
+void scope_destroy_psv(Scope *scope);
+
+#endif

src/scope.c

@@ -0,0 +1,24 @@
+#include "include/scope.h"
+#include "include/htab.h"
+#include <stdlib.h>
+
+Scope* scope_init(HTab* here, Scope* inherit) {
+    Scope* scope = malloc(sizeof(Scope));
+
+    scope->here = here;
+    scope->inherit = inherit;
+
+    return scope;
+}
+
+void scope_destroy(Scope* scope) {
+    htab_destroy(scope->here);
+    if (scope->inherit != NULL) scope_destroy(scope->inherit);
+    free(scope);
+}
+
+void scope_destroy_psv(Scope* scope) {
+    htab_destroy(scope->here);
+    scope->inherit = NULL;
+    free(scope);
+}

test/Unity

@@ -1 +1 @@
-Subproject commit cdf1d0297effc2736ee847e557b4275b4f02310b
+Subproject commit 73237c5d224169c7b4d2ec8321f9ac92e8071708