remove library-name
This commit is contained in:
parent
4bc765da65
commit
cf037f27db
|
@ -168,18 +168,6 @@ pic_lib_library_export(pic_state *pic)
|
||||||
return pic_undef_value();
|
return pic_undef_value();
|
||||||
}
|
}
|
||||||
|
|
||||||
static pic_value
|
|
||||||
pic_lib_library_name(pic_state *pic)
|
|
||||||
{
|
|
||||||
pic_value lib;
|
|
||||||
|
|
||||||
pic_get_args(pic, "o", &lib);
|
|
||||||
|
|
||||||
pic_assert_type(pic, lib, lib);
|
|
||||||
|
|
||||||
return pic_lib_ptr(lib)->name;
|
|
||||||
}
|
|
||||||
|
|
||||||
static pic_value
|
static pic_value
|
||||||
pic_lib_library_exports(pic_state *pic)
|
pic_lib_library_exports(pic_state *pic)
|
||||||
{
|
{
|
||||||
|
@ -215,7 +203,6 @@ pic_init_lib(pic_state *pic)
|
||||||
{
|
{
|
||||||
pic_defun(pic, "make-library", pic_lib_make_library);
|
pic_defun(pic, "make-library", pic_lib_make_library);
|
||||||
pic_defun(pic, "find-library", pic_lib_find_library);
|
pic_defun(pic, "find-library", pic_lib_find_library);
|
||||||
pic_defun(pic, "library-name", pic_lib_library_name);
|
|
||||||
pic_defun(pic, "library-exports", pic_lib_library_exports);
|
pic_defun(pic, "library-exports", pic_lib_library_exports);
|
||||||
pic_defun(pic, "library-environment", pic_lib_library_environment);
|
pic_defun(pic, "library-environment", pic_lib_library_environment);
|
||||||
|
|
||||||
|
|
|
@ -255,7 +255,6 @@
|
||||||
(export make-library
|
(export make-library
|
||||||
find-library
|
find-library
|
||||||
current-library
|
current-library
|
||||||
library-name
|
|
||||||
library-exports
|
library-exports
|
||||||
library-environment)
|
library-environment)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue