fix regression

This commit is contained in:
Yuichi Nishiwaki 2017-04-04 02:41:16 +09:00
parent 889291049f
commit dfc6fa5e77
2 changed files with 2 additions and 3 deletions

View File

@ -30,9 +30,11 @@ void pic_load_native(pic_state *pic, const char *);
* library
*/
#if PIC_USE_LIBRARY
void pic_deflibrary(pic_state *, const char *lib);
void pic_in_library(pic_state *, const char *lib);
void pic_export(pic_state *, int n, ...);
#endif
/* for debug */

View File

@ -14,9 +14,6 @@ main()
pic = pic_open(pic_default_allocf, NULL);
pic_printf(pic, "~s\n", pic_funcall(pic, "compile", 1, pic_read(pic, pic_stdin(pic))));
return 0;
pic_try {
while (1) {
size_t ai = pic_enter(pic);