void pic_init_core(pic_state *pic) { int ai; ai = pic_gc_arena_preserve(pic); pic_init_bool(pic); DONE; pic_init_pair(pic); DONE; pic_init_port(pic); DONE; pic_init_number(pic); DONE; pic_init_time(pic); DONE; pic_init_system(pic); DONE; pic_init_file(pic); DONE; pic_init_proc(pic); DONE; pic_init_symbol(pic); DONE; pic_init_vector(pic); DONE; pic_init_blob(pic); DONE; pic_load_stdlib(pic); DONE; }
static void pic_init_core(pic_state *pic) { size_t ai = pic_enter(pic); pic_init_bool(pic); DONE; pic_init_pair(pic); DONE; pic_init_port(pic); DONE; pic_init_number(pic); DONE; pic_init_proc(pic); DONE; pic_init_symbol(pic); DONE; pic_init_vector(pic); DONE; pic_init_blob(pic); DONE; pic_init_cont(pic); DONE; pic_init_char(pic); DONE; pic_init_error(pic); DONE; pic_init_str(pic); DONE; pic_init_var(pic); DONE; pic_init_dict(pic); DONE; pic_init_record(pic); DONE; pic_init_weak(pic); DONE; pic_init_state(pic); DONE; #if PIC_USE_READ pic_init_read(pic); DONE; #endif #if PIC_USE_WRITE pic_init_write(pic); DONE; #endif #if PIC_USE_FILE pic_init_file(pic); DONE; #endif #if PIC_USE_EVAL pic_init_eval(pic); DONE; #endif }