fix regression
This commit is contained in:
parent
889291049f
commit
dfc6fa5e77
|
@ -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 */
|
||||
|
|
|
@ -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);
|
||||
|
|
Loading…
Reference in New Issue