st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-06 14:58:50 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

cleanup

Browse source
This commit is contained in:
danyabeerzun 2020-01-29 16:32:13 +03:00
parent 9441ff0a0d
commit c8bc0bc8b1
1 changed files with 4 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

15
runtime/runtime.c
View file

@ -69,11 +69,10 @@ void __post_gc_subst () {}
# define BOX(x) ((((int) (x)) << 1) | 0x0001) # define BOX(x) ((((int) (x)) << 1) | 0x0001)
/* GC extra roots */ /* GC extra roots */
#define MAX_EXTRA_ROOTS_NUMBER 16 #define MAX_EXTRA_ROOTS_NUMBER 4
typedef struct { typedef struct {
int current_free; int current_free;
int n; size_t roots[MAX_EXTRA_ROOTS_NUMBER];
size_t * roots;
} extra_roots_pool; } extra_roots_pool;
static extra_roots_pool extra_roots; static extra_roots_pool extra_roots;
@ -86,7 +85,7 @@ void push_extra_root (size_t * p) {
#ifdef DEBUG_PRINT #ifdef DEBUG_PRINT
printf ("push_extra_root %p %p\n", p, &p); fflush (stdout); printf ("push_extra_root %p %p\n", p, &p); fflush (stdout);
#endif #endif
if (extra_roots.current_free >= extra_roots.n) { if (extra_roots.current_free >= MAX_EXTRA_ROOTS_NUMBER) {
perror ("ERROR: push_extra_roots: extra_roots_pool overflow"); perror ("ERROR: push_extra_roots: extra_roots_pool overflow");
exit (1); exit (1);
} }
@ -114,10 +113,6 @@ void pop_extra_root (size_t * p) {
} }
} }
/* # define CLEAR_EXTRA_ROOT do extra_root = BOX(0); while (0) */
/* # define SET_EXTRA_ROOT(n) do extra_root = n; while (0) */
/* # define EXTRA_ROOT extra_root */
/* end */ /* end */
static void vfailure (char *s, va_list args) { static void vfailure (char *s, va_list args) {
@ -1542,10 +1537,8 @@ extern void gc_root_scan_data (void) {
} }
} }
static void init_extra_roots (void) { static inline void init_extra_roots (void) {
extra_roots.current_free = 0; extra_roots.current_free = 0;
extra_roots.n = MAX_EXTRA_ROOTS_NUMBER;
extra_roots.roots = (size_t*) malloc (sizeof(size_t) * MAX_EXTRA_ROOTS_NUMBER);
} }
extern void init_pool (void) { extern void init_pool (void) {