143 lines
3.0 KiB
C
143 lines
3.0 KiB
C
#ifndef TYCHE_PRIV_H
|
|
#define TYCHE_PRIV_H
|
|
|
|
#include "tyche.h"
|
|
|
|
#include <stdbool.h>
|
|
#include <stdint.h>
|
|
#include <stddef.h>
|
|
|
|
//
|
|
// TYPE DECLARATION
|
|
//
|
|
|
|
typedef struct {
|
|
TYC_TYPE type;
|
|
union {
|
|
int32_t i;
|
|
float f;
|
|
uint32_t idx;
|
|
} v;
|
|
} VALUE;
|
|
|
|
typedef struct Stack Stack;
|
|
typedef struct Array Array;
|
|
typedef struct Table Table;
|
|
typedef struct Heap Heap;
|
|
typedef struct Code Code;
|
|
|
|
typedef uint32_t HEAP_KEY;
|
|
typedef uint64_t TABLE_HASH;
|
|
|
|
typedef enum {
|
|
TC_STRING, TC_REAL,
|
|
} TYC_CONST_TYPE;
|
|
|
|
//
|
|
// UTILS
|
|
//
|
|
|
|
__attribute__((noreturn)) void out_of_memory(void);
|
|
void* xmalloc(size_t n);
|
|
void* xcalloc(size_t n, size_t size);
|
|
void* xrealloc(void* p, size_t n);
|
|
|
|
//
|
|
// VALUE
|
|
//
|
|
|
|
TYC_TYPE value_type(VALUE v);
|
|
bool type_is_collectable(TYC_TYPE t);
|
|
|
|
int32_t value_integer(VALUE v);
|
|
float value_real(VALUE v);
|
|
uint32_t value_idx(VALUE v);
|
|
bool value_is_zero(VALUE v);
|
|
|
|
VALUE create_value_nil(void);
|
|
VALUE create_value_integer(int32_t v);
|
|
VALUE create_value_real(float f);
|
|
VALUE create_value_idx(TYC_TYPE type, uint32_t idx);
|
|
|
|
//
|
|
// STACK
|
|
//
|
|
|
|
Stack* stack_new(void);
|
|
void stack_destroy(Stack* s);
|
|
|
|
TYC_RESULT stack_push(Stack* s, VALUE v);
|
|
TYC_RESULT stack_peek(Stack const* s, VALUE* v_out);
|
|
TYC_RESULT stack_pop(Stack* s, VALUE* v_out);
|
|
|
|
size_t stack_len(Stack const* s);
|
|
|
|
TYC_RESULT stack_at(Stack const* s, int32_t key, VALUE* v);
|
|
TYC_RESULT stack_set(Stack* s, int32_t key, VALUE v);
|
|
|
|
size_t stack_top_fp(Stack const* s);
|
|
TYC_RESULT stack_push_fp(Stack* s);
|
|
TYC_RESULT stack_pop_fp(Stack* s);
|
|
size_t stack_fp_level(Stack const* s);
|
|
|
|
size_t stack_collectable_array(Stack const* s, VALUE** values);
|
|
|
|
//
|
|
// HEAP ARRAY
|
|
//
|
|
|
|
Array* array_new(void);
|
|
void array_destroy(Array* a);
|
|
|
|
size_t array_len(Array const* a);
|
|
VALUE array_get(Array const* a, size_t pos);
|
|
void array_set(Array* a, size_t pos, VALUE v);
|
|
void array_append(Array* a, VALUE v);
|
|
|
|
//
|
|
// HEAP TABLE
|
|
//
|
|
|
|
Table* table_new(Heap const* heap);
|
|
void table_destroy(Table* t);
|
|
|
|
size_t table_len(Table* t);
|
|
TYC_RESULT table_get(Table const* t, VALUE key, VALUE* value);
|
|
void table_set(Table* t, VALUE key, VALUE value);
|
|
void table_del(Table* t, VALUE key);
|
|
|
|
//
|
|
// HEAP
|
|
//
|
|
|
|
Heap* heap_new(void);
|
|
void heap_destroy(Heap* h);
|
|
|
|
HEAP_KEY heap_add_string(Heap* h, const char* value);
|
|
TYC_RESULT heap_get_string(Heap const* h, HEAP_KEY key, const char** value);
|
|
|
|
size_t heap_size(Heap const* h);
|
|
|
|
void heap_gc(Heap* h, VALUE const* roots, size_t n_roots);
|
|
|
|
//
|
|
// CODE
|
|
//
|
|
|
|
TYC_RESULT code_assemble(const char* code, uint8_t** bytecode, size_t* bytecode_sz);
|
|
|
|
Code* code_new();
|
|
void code_destroy(Code* code);
|
|
|
|
TYC_RESULT code_load_bytecode(Code* code, uint8_t* bytecode, size_t bytecode_sz);
|
|
|
|
size_t code_n_consts(Code const* code);
|
|
TYC_CONST_TYPE code_const_type(Code const* code, size_t n);
|
|
|
|
T_REAL code_const_real(Code const* code, size_t n);
|
|
const char* code_const_string(Code const* code, size_t n);
|
|
|
|
size_t code_n_functions(Code const* code);
|
|
|
|
#endif //TYCHE_PRIV_H
|