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

cleanup

This commit is contained in:
Yuichi Nishiwaki 2016-02-23 22:55:15 +09:00
parent 54d9d4865c
commit eea41c53d7
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extlib/benz/include/picrin/extra.h
View File

@ -59,8 +59,8 @@ xFILE *xfopen_null(pic_state *, const char *mode);
#define pic_push(pic, item, place) (place = pic_cons(pic, item, place)) #define pic_push(pic, item, place) (place = pic_cons(pic, item, place))
#define pic_pop(pic, place) (place = pic_cdr(pic, place)) #define pic_pop(pic, place) (place = pic_cdr(pic, place))
#define pic_void(exec) pic_void_(PIC_GENSYM(ai), exec) #define pic_void(pic, exec) pic_void_(pic, PIC_GENSYM(ai), exec)
#define pic_void_(ai,exec) do { \ #define pic_void_(pic,ai,exec) do { \
size_t ai = pic_enter(pic); \ size_t ai = pic_enter(pic); \
exec; \ exec; \
pic_leave(pic, ai); \ pic_leave(pic, ai); \
@ -101,8 +101,6 @@ pic_value pic_get_backtrace(pic_state *);
void pic_print_error(pic_state *, xFILE *); void pic_print_error(pic_state *, xFILE *);
#endif #endif
pic_value pic_library_environment(pic_state *, const char *);
#if defined(__cplusplus) #if defined(__cplusplus)
} }
#endif #endif

2
extlib/benz/include/picrin/private/object.h
View File

@ -213,6 +213,8 @@ pic_value pic_dynamic_wind(pic_state *, pic_value in, pic_value thunk, pic_value
pic_value pic_dynamic_bind(pic_state *, pic_value var, pic_value val, pic_value thunk); pic_value pic_dynamic_bind(pic_state *, pic_value var, pic_value val, pic_value thunk);
pic_value pic_library_environment(pic_state *, const char *);
#if defined(__cplusplus) #if defined(__cplusplus)
} }
#endif #endif