define pic_push/pic_pop macro in pair.h
This commit is contained in:
parent
a9a530c9bd
commit
9a3ff987af
|
@ -39,6 +39,9 @@ pic_value pic_make_list(pic_state *, int, pic_value);
|
|||
pic_nil_p(tmp) ? false : ((var = pic_car(pic, tmp)), true); \
|
||||
tmp = pic_cdr(pic, tmp))
|
||||
|
||||
#define pic_push(pic, item, place) (place = pic_cons(pic, item, place))
|
||||
#define pic_pop(pic, place) (place = pic_cdr(pic, place))
|
||||
|
||||
int pic_length(pic_state *, pic_value);
|
||||
pic_value pic_reverse(pic_state *, pic_value);
|
||||
pic_value pic_append(pic_state *, pic_value, pic_value);
|
||||
|
|
|
@ -400,8 +400,6 @@ analyze_quote(analyze_state *state, pic_value obj)
|
|||
return obj;
|
||||
}
|
||||
|
||||
#define pic_push(pic, item, place) (place = pic_cons(pic, item, place))
|
||||
|
||||
static pic_value
|
||||
analyze_lambda(analyze_state *state, pic_value obj)
|
||||
{
|
||||
|
|
Loading…
Reference in New Issue