feat: implement lexer+parser for example program

include/compiler/fzl_debug.h

@@ -0,0 +1,10 @@
+#ifndef FZL_DEBUG_H
+#define FZL_DEBUG_H
+
+#include <compiler/fzl_parser.h>
+
+// Print AST
+void fzl_debug_print_ast(fzl_node_t *root);
+
+#endif//FZL_DEBUG_H
+

include/compiler/fzl_parser.h

@@ -0,0 +1,58 @@
+#ifndef FZL_PARSER_H
+#define FZL_PARSER_H
+
+#include <stddef.h>
+#include <compiler/fzl_token.h>
+#include <compiler/fzl_reader.h>
+
+// AST node type
+typedef enum {
+	FZL_NODETYPE_BLOCK,
+	FZL_NODETYPE_CALL,
+	FZL_NODETYPE_LITERAL,
+} fzl_nodetype_t;
+
+// AST node descriptor
+typedef struct fzl_node {
+	fzl_nodetype_t type;
+	fzl_token_t *token;
+	struct fzl_node *parent;
+	struct fzl_node *next;
+
+	union {
+		struct {
+			struct fzl_node **entries;
+			size_t entry_count;
+		} list;
+	};
+} fzl_node_t;
+
+// Token sequence parser descriptor
+typedef struct {
+	fzl_reader_ll_t *first;
+	size_t token_count;
+
+	fzl_reader_ll_t *cursor;
+	fzl_node_t *root;
+} fzl_parser_t;
+
+// Allocate parser
+fzl_parser_t *fzl_mkparser(fzl_reader_ll_t *first);
+
+// Allocate new node
+fzl_node_t *fzl_mknode(fzl_nodetype_t type, fzl_token_t *tok);
+
+// Parse tokens
+int fzl_parse(fzl_parser_t *parser);
+
+// Get last parser error
+char *fzl_parser_geterror();
+
+// Free node
+void fzl_freenode(fzl_node_t* node);
+
+// Free parser
+void fzl_freeparser(fzl_parser_t *parser);
+
+#endif//FZL_PARSER_H
+

include/compiler/fzl_reader.h

@@ -0,0 +1,38 @@
+#ifndef FZL_READER_H
+#define FZL_READER_H
+
+#include <stdint.h>
+#include <stddef.h>
+#include <stdbool.h>
+#include <compiler/fzl_token.h>
+
+// Tokens linked list descriptor
+typedef struct fzl_reader_ll {
+	fzl_token_t *token;
+	struct fzl_reader_ll *next;
+} fzl_reader_ll_t;
+
+// Source reader description
+typedef struct {
+	fzl_reader_ll_t *first;
+	fzl_reader_ll_t *last;
+
+	char *source;
+	size_t position;
+	bool at_end;
+} fzl_reader_t;
+
+// Allocate new reader
+fzl_reader_t *fzl_mkreader(char *source);
+
+// Read source file
+int fzl_read(fzl_reader_t *reader);
+
+// Get last error from reader
+char *fzl_reader_geterror();
+
+// Free reader
+void fzl_freereader(fzl_reader_t *reader);
+
+#endif//FZL_READER_H
+

include/compiler/fzl_token.h

@@ -0,0 +1,36 @@
+#ifndef FZL_TOKEN_H
+#define FZL_TOKEN_H
+
+#include <stdint.h>
+#include <stddef.h>
+#include <stdbool.h>
+
+// Token type
+typedef enum {
+	FZL_TOKTYPE_NAME,
+	FZL_TOKTYPE_LPAIR,
+	FZL_TOKTYPE_RPAIR,
+	FZL_TOKTYPE_COMMA,
+	FZL_TOKTYPE_STR_LITERAL
+} fzl_toktype_t;
+
+// Token descriptor
+typedef struct {
+	fzl_toktype_t type;
+	uint16_t i0;
+	uint16_t i1;
+	bool store_value;
+	void *value;
+	uint16_t value_sz;
+} fzl_token_t;
+
+// Allocate new token
+fzl_token_t *fzl_mktoken(
+	const fzl_toktype_t type, uint16_t from, uint16_t to,
+	void *value, size_t value_sz);
+
+// Free token and its contents
+void fzl_freetoken(fzl_token_t *token);
+
+#endif//FZL_TOKEN_H
+