conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

select the minimal library at first

This commit is contained in:
Yuichi Nishiwaki 2013-12-07 07:05:22 -08:00
parent 7c6ba80581
commit 9cb777eec3
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/state.c
View File

@ -118,6 +118,10 @@ pic_open(int argc, char *argv[], char **envp)
register_core_symbol(pic, sGE, ">="); register_core_symbol(pic, sGE, ">=");
pic_gc_arena_restore(pic, ai); pic_gc_arena_restore(pic, ai);
/* set library */
pic_make_library(pic, pic_symbol_value(pic_intern_cstr(pic, "user")));
pic_in_library(pic, pic_symbol_value(pic_intern_cstr(pic, "user")));
pic_init_core(pic); pic_init_core(pic);
return pic; return pic;