wip: working on analyzer

- Feat: add binary math analysis
- Fix: check for function context in block analysis
- Feat: add 'break' analysis
- Fix: few fixes in call analysis
- Feat: add class analysis
- Feat: add construct analysis
- Feat: add declaration analysis
- Feat: add field analysis
- Feat: add function analysis
- Feat: add loop analysis
- Ref: updated utilities and context functions

src/compiler/analyzer/an_construct.c

@@ -0,0 +1,40 @@
+#include <common/fzl_types.h>
+#include <compiler/fzl_analyzer.h>
+#include <compiler/fzl_parser.h>
+#include <compiler/utils/fzl_symtable.h>
+#include <stdbool.h>
+#include <stdio.h>
+
+char c_problem[256];
+
+// Analyze class construct
+fzl_an_res_t analyze_construct(fzl_analyzer_t *analyzer, fzl_node_t *construct)
+{
+  if (!analyzer)
+    return (fzl_an_res_t){.error = true};
+
+  if (!construct || construct->type != FZL_NODETYPE_CONSTRUCT)
+  {
+    an_push_error(analyzer, NULL, "node is not typeof CONSTRUCT");
+    return (fzl_an_res_t){.error = true};
+  }
+
+  char *classname = (char *)construct->construct.name->token->value;
+  fzl_sym_t sym;
+  bool sym_found = false;
+  for (ssize_t i = analyzer->symbols_top - 1; i >= 0; i--)
+  {
+    if ((sym_found = fzl_symt_get(analyzer->symbols[i], classname, &sym)))
+      break;
+  }
+
+  if (!sym_found)
+  {
+    snprintf(c_problem, sizeof(c_problem), "class '%s' not found", classname);
+    an_push_error(analyzer, construct->token, c_problem);
+    return (fzl_an_res_t){.error = true};
+  }
+
+  return (fzl_an_res_t){
+      .error = false, .type = FZL_TYPE_OBJECT, .classname = classname};
+}