Forth-embed/forth_embed.h at main · KorolevSoftware/Forth-embed · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#pragma once
#include <stdbool.h>

// Public API

// Interface struct
struct forth_byte_code;
struct forth_state;

// forth stack manipulation
void forth_data_stack_push(struct forth_state* fs, int value);
int forth_data_stack_pop(struct forth_state* fs);


// Create forth stack from run/eval program
struct forth_state* forth_make_default_state();
struct forth_state* forth_make_state(int data_size, int integer_memory_size, int return_stack_size, int dictionary_size, int native_functions_size);
void forth_release_state(struct forth_state* fs);

typedef void (*forth_native_function)(struct forth_state* fs);

// Set user constants, variables or functions
void forth_set_constant(struct forth_state* fs, const char* name, int value);
void forth_set_function(struct forth_state* fs, const char* name, forth_native_function func);


// Run code or function
void forth_run(struct forth_state* fs, const struct forth_byte_code* script);
bool forth_run_function(struct forth_state* fs, const struct forth_byte_code* script, const char* func_name);

void forth_set_user_data(struct forth_state* fs, void* user_data);
void* forth_get_user_data(struct forth_state* fs);

// Compile and release functions
const struct forth_byte_code* forth_compile(const char* script);
void forth_release_byte_code(struct forth_byte_code* fbc);