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

use pic_deflibrary in init.c

This commit is contained in:
Yuichi Nishiwaki 2014-03-01 19:54:29 +09:00
parent 95dc14bac2
commit 6ddaa0eda0
1 changed files with 33 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/init.c
View File

@ -79,8 +79,7 @@ pic_init_core(pic_state *pic)
{ {
int ai = pic_gc_arena_preserve(pic); int ai = pic_gc_arena_preserve(pic);
pic_make_library(pic, pic_parse(pic, "(scheme base)")); pic_deflibrary ("(scheme base)") {
pic_in_library(pic, pic_parse(pic, "(scheme base)"));
/* load core syntaces */ /* load core syntaces */
pic->lib->senv = pic_core_syntactic_env(pic); pic->lib->senv = pic_core_syntactic_env(pic);
@ -115,4 +114,6 @@ pic_init_core(pic_state *pic)
pic_load_stdlib(pic); DONE; pic_load_stdlib(pic); DONE;
pic_defun(pic, "features", pic_features); pic_defun(pic, "features", pic_features);
}
} }