#include <stdio.h>
#include <libtcc.h>
#include <math.h>

static TCCState* s = 0;

extern void symc_init() {
    if (s != 0) {
	tcc_delete(s);
    }
    s = tcc_new();

    if (s == 0) {
	fprintf(stderr, "Tiny cc doesn't function properly");
	exit(1);
    }
}

extern void symc_compile(const char* func_str) {
    //printf("Compiling %s\n", func_str);
    tcc_compile_string(s, func_str);
}

extern void symc_link() {
    tcc_relocate(s);
}

extern void* symc_get_fun(const char* func_name) {
    unsigned long val;
    tcc_get_symbol(s, &val, func_name);
    return (void*) val;
}

extern void* symc_make(const char* func_str, const char* func_name) {
    symc_init();
    symc_compile(func_str);
    symc_link();
    return symc_get_fun(func_name);
}