Parsing exprs, enum_decls, Introduce intern table, symbol table

decl.c

@@ -0,0 +1,50 @@
+
+function Decl *
+decl_new(Parser *p, Decl_Kind kind, Token *token, Intern_String name){
+  Decl *result = arena_push_struct(&p->main_arena, Decl);
+  memory_zero(result, sizeof(Decl));
+  
+  result->token = token;
+  result->kind = kind;
+  result->name = name;
+  return result;
+}
+
+function Decl_Enum_Child *
+decl_enum_child(Parser *p, Token *token, Expr *expr){
+  Decl_Enum_Child *result = arena_push_struct(&p->main_arena, Decl_Enum_Child);
+  memory_zero(result, sizeof(Decl_Enum_Child));
+  result->expr = expr;
+  result->token = token;
+  return result;
+}
+
+function Decl *
+decl_enum(Parser *p, Token *token, Intern_String name){
+  Decl *result = decl_new(p, DK_Enum, token, name);
+  return result;
+}
+
+function Decl *
+decl_struct(Parser *p, Token *token, Intern_String name){
+  Decl *result = decl_new(p, DK_Struct, token, name);
+  return result;
+}
+function Decl *
+decl_union(Parser *p, Token *token, Intern_String name){
+  Decl *result = decl_new(p, DK_Union, token, name);
+  return result;
+}
+
+function void
+decl_aggregate_push(Decl *a, Decl *b){
+  SLLQueuePush(a->aggregate_val.first, a->aggregate_val.last, b);
+}
+function void
+decl_function_push(Decl *a, Decl *b){
+  SLLQueuePush(a->func_val.first, a->func_val.last, b);
+}
+function void
+decl_enum_push(Decl *a, Decl_Enum_Child *b){
+  SLLQueuePush(a->enum_val.first, a->enum_val.last, b);
+}