ref: move analyzer fn defs into compiler/iternals

src/compiler/analyzer/an_assign.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <stdio.h>
 
 // Analyze assigns

src/compiler/analyzer/an_binmath.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <stdio.h>
 
 // Analyze binary arithmetics

src/compiler/analyzer/an_block.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <stddef.h>
 #include <stdio.h>
 

src/compiler/analyzer/an_break.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 
 // Analyze break node
 fzl_an_res_t analyze_break(fzl_analyzer_t *analyzer, fzl_node_t *break_node)

src/compiler/analyzer/an_call.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stddef.h>

src/compiler/analyzer/an_class.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdio.h>
 

src/compiler/analyzer/an_common.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <stddef.h>
 #include <stdlib.h>
 
@@ -14,6 +15,10 @@ fzl_an_res_t analyze_common(fzl_analyzer_t *analyzer, fzl_node_t *node)
   fzl_an_res_t res = {.error = false, .type = FZL_TYPE_NULL, .classname = NULL};
   switch (node->type)
   {
+    case FZL_NODETYPE_FMT_STRING:
+      res = analyze_strfmt(analyzer, node);
+      break;
+
     case FZL_NODETYPE_ASSIGN:
       res = analyze_assign(analyzer, node);
       break;

src/compiler/analyzer/an_condition.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <stdio.h>
 
 // Analyze binary conditional nodes

src/compiler/analyzer/an_conditional.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <stdio.h>
 
 // Analyze conditional statement

src/compiler/analyzer/an_construct.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stdio.h>

src/compiler/analyzer/an_declaration.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stdio.h>

src/compiler/analyzer/an_field.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stddef.h>

src/compiler/analyzer/an_function.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stddef.h>
 #include <stdio.h>

src/compiler/analyzer/an_identifier.c

@@ -1,5 +1,6 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdio.h>
 

src/compiler/analyzer/an_loop.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stdio.h>

src/compiler/analyzer/an_return.c

@@ -2,6 +2,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <stdio.h>
 
 // Analyze return statement

src/compiler/analyzer/an_strfmt.c

@@ -0,0 +1,39 @@
+#include <common/fzl_types.h>
+#include <compiler/fzl_analyzer.h>
+#include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
+#include <stddef.h>
+
+// Analyze format string
+fzl_an_res_t analyze_strfmt(fzl_analyzer_t *analyzer, fzl_node_t *strfmt_node)
+{
+  if (!analyzer)
+    return (fzl_an_res_t){.error = true};
+
+  if (!strfmt_node || strfmt_node->type != FZL_NODETYPE_FMT_STRING)
+  {
+    an_push_error(analyzer, NULL, "node is not format string");
+    return (fzl_an_res_t){.error = true};
+  }
+
+  for (size_t i = 0; i < strfmt_node->list.entry_count; i++)
+  {
+    fzl_node_t *node = strfmt_node->list.entries[i];
+
+    if (node->type != FZL_NODETYPE_LITERAL &&
+        node->type != FZL_NODETYPE_IDENTIFIER)
+    {
+      an_push_error(
+          analyzer, node->token,
+          "format string can only contain string literals and identifiers");
+      return (fzl_an_res_t){.error = true};
+    }
+
+    fzl_an_res_t node_res = analyze_common(analyzer, node);
+    if (node_res.error)
+      return (fzl_an_res_t){.error = true};
+  }
+
+  return (fzl_an_res_t){
+      .error = false, .type = FZL_TYPE_STRING, .classname = NULL};
+}

src/compiler/analyzer/an_unarycond.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 
 // Analyze unary condition
 fzl_an_res_t analyze_unarycond(fzl_analyzer_t *analyzer, fzl_node_t *unary)

src/compiler/analyzer/an_unarymath.c

@@ -1,6 +1,7 @@
 #include <common/fzl_types.h>
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
+#include <compiler/internals/analyzer.h>
 #include <stdbool.h>
 
 // Analyze unary arithmetic

src/compiler/analyzer/context.c

@@ -1,4 +1,5 @@
 #include <compiler/fzl_analyzer.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdlib.h>
 #include <string.h>

src/compiler/fzl_analyzer.c

@@ -1,6 +1,7 @@
 #include <compiler/fzl_analyzer.h>
 #include <compiler/fzl_parser.h>
 #include <compiler/fzl_token.h>
+#include <compiler/internals/analyzer.h>
 #include <compiler/utils/fzl_symtable.h>
 #include <stdbool.h>
 #include <stddef.h>