luboslenco
128 lines
1.7 KiB
C
128 lines
1.7 KiB
C
|
|
#include "iron_gc.h"
|
|
|
|
#ifdef NO_GC
|
|
|
|
#include <memory.h>
|
|
#include <stdint.h>
|
|
#include <stdlib.h>
|
|
|
|
#define HEAP_SIZE 512 * 1024 * 1024
|
|
static uint8_t *heap = NULL;
|
|
static size_t heap_top = 0;
|
|
|
|
void *gc_alloc(size_t size) {
|
|
#ifdef HEAP_SIZE
|
|
size_t old_top = heap_top;
|
|
heap_top += size;
|
|
return &heap[old_top];
|
|
#else
|
|
return calloc(size, 1);
|
|
#endif
|
|
}
|
|
|
|
void gc_array(void *ptr, int *length) {}
|
|
|
|
void gc_leaf(void *ptr) {}
|
|
|
|
void gc_root(void *ptr) {}
|
|
|
|
void gc_unroot(void *ptr) {}
|
|
|
|
void *gc_cut(void *ptr, size_t pos, size_t size) {
|
|
return NULL;
|
|
}
|
|
|
|
void *gc_realloc(void *ptr, size_t size) {
|
|
#ifdef HEAP_SIZE
|
|
void *new_ptr = gc_alloc(size);
|
|
if (ptr != NULL) {
|
|
memcpy(new_ptr, ptr, size);
|
|
}
|
|
return new_ptr;
|
|
#else
|
|
return realloc(ptr, size);
|
|
#endif
|
|
}
|
|
|
|
void gc_free(void *ptr) {
|
|
#ifdef HEAP_SIZE
|
|
#else
|
|
free(ptr);
|
|
#endif
|
|
}
|
|
|
|
void gc_pause() {}
|
|
|
|
void gc_resume() {}
|
|
|
|
void gc_run() {}
|
|
|
|
void gc_start(void *bos) {
|
|
#ifdef HEAP_SIZE
|
|
heap = (uint8_t *)calloc(HEAP_SIZE, 1);
|
|
#endif
|
|
}
|
|
|
|
void gc_stop() {}
|
|
|
|
#else
|
|
|
|
#include <gc.h>
|
|
|
|
void *gc_alloc(size_t size) {
|
|
return _gc_calloc(size, sizeof(uint8_t));
|
|
}
|
|
|
|
void gc_array(void *ptr, int *length) {
|
|
_gc_array(ptr, length);
|
|
}
|
|
|
|
void gc_leaf(void *ptr) {
|
|
_gc_leaf(ptr);
|
|
}
|
|
|
|
void gc_root(void *ptr) {
|
|
_gc_root(ptr);
|
|
}
|
|
|
|
void gc_unroot(void *ptr) {
|
|
_gc_unroot(ptr);
|
|
}
|
|
|
|
void *gc_cut(void *ptr, size_t pos, size_t size) {
|
|
return _gc_cut(ptr, pos, size);
|
|
}
|
|
|
|
void *gc_realloc(void *ptr, size_t size) {
|
|
return ptr == NULL ? gc_alloc(size) : _gc_realloc(ptr, size);
|
|
}
|
|
|
|
void gc_free(void *ptr) {
|
|
if (ptr != NULL) {
|
|
_gc_free(ptr);
|
|
}
|
|
}
|
|
|
|
void gc_pause() {
|
|
_gc_pause();
|
|
}
|
|
|
|
void gc_resume() {
|
|
_gc_resume();
|
|
}
|
|
|
|
void gc_run() {
|
|
_gc_run();
|
|
}
|
|
|
|
void gc_start(void *bos) {
|
|
_gc_start(bos);
|
|
}
|
|
|
|
void gc_stop() {
|
|
_gc_stop();
|
|
}
|
|
|
|
#endif
|