Change to incremental GC
This commit is contained in:
@@ -42,6 +42,7 @@ static void register_manual_symbols(void) {
|
||||
void lisp_init(void) {
|
||||
construct_manual_symbols();
|
||||
obarray = Fmake_hash_table(Qhash_string, Qstrings_equal);
|
||||
lisp_gc_register_static_object(obarray);
|
||||
|
||||
// Needed to register functions
|
||||
REGISTER_GLOBAL_SYMBOL(and_allow_other_keys);
|
||||
@@ -58,6 +59,7 @@ void lisp_init(void) {
|
||||
register_globals();
|
||||
|
||||
lisp_init_stack();
|
||||
lisp_gc_on_alloc = true;
|
||||
}
|
||||
|
||||
void lisp_shutdown(void) {
|
||||
|
||||
Reference in New Issue
Block a user