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

use find_library inside in_library

This commit is contained in:
Yuichi Nishiwaki 2013-12-10 05:40:03 -08:00
parent 38aa2d5880
commit afe630bc42
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/lib.c
View File

@ -28,15 +28,15 @@ pic_make_library(pic_state *pic, pic_value name)
}
void
pic_in_library(pic_state *pic, pic_value name)
pic_in_library(pic_state *pic, pic_value spec)
{
pic_value v;
struct pic_lib *lib;
v = pic_assoc(pic, name, pic->lib_tbl);
if (pic_false_p(v)) {
lib = pic_find_library(pic, spec);
if (! lib) {
pic_error(pic, "library not found");
}
pic->lib = pic_lib_ptr(pic_cdr(pic, v));
pic->lib = lib;
}
struct pic_lib *