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

remove typedef of pic_list

This commit is contained in:
Yuichi Nishiwaki 2015-08-05 10:36:28 +09:00
parent fa8557823f
commit ceafb6b600
4 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -192,7 +192,7 @@ void pic_defvar_(pic_state *, const char *, pic_value, struct pic_proc *);
pic_value pic_ref(pic_state *, struct pic_lib *, const char *); pic_value pic_ref(pic_state *, struct pic_lib *, const char *);
void pic_set(pic_state *, struct pic_lib *, const char *, pic_value); void pic_set(pic_state *, struct pic_lib *, const char *, pic_value);
pic_value pic_funcall(pic_state *pic, struct pic_lib *, const char *, pic_list); pic_value pic_funcall(pic_state *pic, struct pic_lib *, const char *, pic_value);
pic_value pic_funcall0(pic_state *pic, struct pic_lib *, const char *); pic_value pic_funcall0(pic_state *pic, struct pic_lib *, const char *);
pic_value pic_funcall1(pic_state *pic, struct pic_lib *, const char *, pic_value); pic_value pic_funcall1(pic_state *pic, struct pic_lib *, const char *, pic_value);
pic_value pic_funcall2(pic_state *pic, struct pic_lib *, const char *, pic_value, pic_value); pic_value pic_funcall2(pic_state *pic, struct pic_lib *, const char *, pic_value, pic_value);

4
extlib/benz/include/picrin/error.h
View File

@ -20,7 +20,7 @@ struct pic_error {
#define pic_error_p(v) (pic_type(v) == PIC_TT_ERROR) #define pic_error_p(v) (pic_type(v) == PIC_TT_ERROR)
#define pic_error_ptr(v) ((struct pic_error *)pic_ptr(v)) #define pic_error_ptr(v) ((struct pic_error *)pic_ptr(v))
struct pic_error *pic_make_error(pic_state *, pic_sym *, const char *, pic_list); struct pic_error *pic_make_error(pic_state *, pic_sym *, const char *, pic_value);
/* do not return from try block! */ /* do not return from try block! */
@ -55,7 +55,7 @@ struct pic_proc *pic_pop_handler(pic_state *);
pic_value pic_raise_continuable(pic_state *, pic_value); pic_value pic_raise_continuable(pic_state *, pic_value);
PIC_NORETURN void pic_raise(pic_state *, pic_value); PIC_NORETURN void pic_raise(pic_state *, pic_value);
PIC_NORETURN void pic_error(pic_state *, const char *, pic_list); PIC_NORETURN void pic_error(pic_state *, const char *, pic_value);
#if defined(__cplusplus) #if defined(__cplusplus)
} }

1
extlib/benz/include/picrin/type.h
View File

@ -182,7 +182,6 @@ struct pic_error;
struct pic_env; struct pic_env;
/* set aliases to basic types */ /* set aliases to basic types */
typedef pic_value pic_list;
typedef struct pic_symbol pic_sym; typedef struct pic_symbol pic_sym;
typedef struct pic_pair pic_pair; typedef struct pic_pair pic_pair;
typedef struct pic_string pic_str; typedef struct pic_string pic_str;

2
extlib/benz/vm.c
View File

@ -1182,7 +1182,7 @@ pic_set(pic_state *pic, struct pic_lib *lib, const char *name, pic_value val)
} }
pic_value pic_value
pic_funcall(pic_state *pic, struct pic_lib *lib, const char *name, pic_list args) pic_funcall(pic_state *pic, struct pic_lib *lib, const char *name, pic_value args)
{ {
pic_value proc; pic_value proc;