s/pic_trampoline/pic_apply_trampoline/g
This commit is contained in:
parent
69ac02f836
commit
34bcabf5bc
|
@ -180,7 +180,7 @@ pic_value pic_load(pic_state *, const char *);
|
||||||
|
|
||||||
pic_value pic_apply(pic_state *, struct pic_proc *, pic_value);
|
pic_value pic_apply(pic_state *, struct pic_proc *, pic_value);
|
||||||
pic_value pic_apply_argv(pic_state *, struct pic_proc *, size_t, ...);
|
pic_value pic_apply_argv(pic_state *, struct pic_proc *, size_t, ...);
|
||||||
pic_value pic_trampoline(pic_state *, struct pic_proc *, pic_value);
|
pic_value pic_apply_trampoline(pic_state *, struct pic_proc *, pic_value);
|
||||||
struct pic_proc *pic_compile(pic_state *, pic_value);
|
struct pic_proc *pic_compile(pic_state *, pic_value);
|
||||||
pic_value pic_macroexpand(pic_state *, pic_value);
|
pic_value pic_macroexpand(pic_state *, pic_value);
|
||||||
|
|
||||||
|
|
|
@ -257,7 +257,7 @@ pic_callcc_trampoline(pic_state *pic, struct pic_proc *proc)
|
||||||
pic_proc_cv_init(pic, c, 1);
|
pic_proc_cv_init(pic, c, 1);
|
||||||
pic_proc_cv_set(pic, c, 0, pic_obj_value(cont));
|
pic_proc_cv_set(pic, c, 0, pic_obj_value(cont));
|
||||||
|
|
||||||
return pic_trampoline(pic, proc, pic_list1(pic, pic_obj_value(c)));
|
return pic_apply_trampoline(pic, proc, pic_list1(pic, pic_obj_value(c)));
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -328,7 +328,7 @@ pic_cont_call_with_values(pic_state *pic)
|
||||||
|
|
||||||
argc = pic_receive(pic, 256, args);
|
argc = pic_receive(pic, 256, args);
|
||||||
|
|
||||||
return pic_trampoline(pic, consumer, pic_list_by_array(pic, argc, args));
|
return pic_apply_trampoline(pic, consumer, pic_list_by_array(pic, argc, args));
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
void
|
||||||
|
|
|
@ -132,7 +132,7 @@ pic_proc_apply(pic_state *pic)
|
||||||
arg_list = pic_cons(pic, args[argc], arg_list);
|
arg_list = pic_cons(pic, args[argc], arg_list);
|
||||||
}
|
}
|
||||||
|
|
||||||
return pic_trampoline(pic, proc, arg_list);
|
return pic_apply_trampoline(pic, proc, arg_list);
|
||||||
}
|
}
|
||||||
|
|
||||||
static pic_value
|
static pic_value
|
||||||
|
|
2
src/vm.c
2
src/vm.c
|
@ -855,7 +855,7 @@ static struct pic_code trampoline_iseq[] = {
|
||||||
};
|
};
|
||||||
|
|
||||||
pic_value
|
pic_value
|
||||||
pic_trampoline(pic_state *pic, struct pic_proc *proc, pic_value args)
|
pic_apply_trampoline(pic_state *pic, struct pic_proc *proc, pic_value args)
|
||||||
{
|
{
|
||||||
pic_value v, call_list, *fp = pic->ci->fp;
|
pic_value v, call_list, *fp = pic->ci->fp;
|
||||||
pic_callinfo *ci;
|
pic_callinfo *ci;
|
||||||
|
|
Loading…
Reference in New Issue