crepl

#pragma once

#include "defaults.h"
#include "parse.h"

typedef enum {
	T_NUMBER,  // NumberNode (ParsNode).
	T_STRING,  // Native char pointer.
	T_FUNCTION_PTR,  // Wrapper of native function pointer.
} DataType;

typedef struct {
	DataType type;
	void *value;
} DataValue;

#define FUNC_PTR(FUNC_NAME) \
	DataValue *(*FUNC_NAME)(DataValue)

typedef struct {
	FUNC_PTR(fn);
} FnPtr;

typedef struct {
	const char *name;
	DataValue value;
} Local;

struct _context;

typedef struct _context {
	struct _context *superior;
	const char *function;
	// `locals` works as a dynamic array;
	usize locals_count;
	usize locals_capacity;
	Local *locals;
} Context;

typedef enum {
	ARG, LHS, RHS
} ParamPos;

void free_datavalue(DataValue *);
void *type_check(const char *, ParamPos, DataType, const DataValue *);
DataValue *execute(Context *, const ParseNode *);
DataValue *wrap_data(DataType, void *);
Local *make_local(const char *, DataType, void *);
void bind_local(Context *, const char *, DataType, void *);
void bind_builtin_functions(Context *);
Context *init_context();
Context *base_context();
Context *make_context(const char *, Context *);