s/pic_make_cont/pic_make_econt/g
This commit is contained in:
parent
7c5fb70e73
commit
cb2157bbae
4
cont.c
4
cont.c
|
@ -112,7 +112,7 @@ escape_call(pic_state *pic)
|
||||||
}
|
}
|
||||||
|
|
||||||
struct pic_proc *
|
struct pic_proc *
|
||||||
pic_make_cont(pic_state *pic, struct pic_escape *escape)
|
pic_make_econt(pic_state *pic, struct pic_escape *escape)
|
||||||
{
|
{
|
||||||
static const pic_data_type escape_type = { "escape", pic_free, NULL };
|
static const pic_data_type escape_type = { "escape", pic_free, NULL };
|
||||||
struct pic_proc *cont;
|
struct pic_proc *cont;
|
||||||
|
@ -141,7 +141,7 @@ pic_escape(pic_state *pic, struct pic_proc *proc)
|
||||||
else {
|
else {
|
||||||
pic_value val;
|
pic_value val;
|
||||||
|
|
||||||
val = pic_apply1(pic, proc, pic_obj_value(pic_make_cont(pic, escape)));
|
val = pic_apply1(pic, proc, pic_obj_value(pic_make_econt(pic, escape)));
|
||||||
|
|
||||||
escape->valid = false;
|
escape->valid = false;
|
||||||
|
|
||||||
|
|
2
error.c
2
error.c
|
@ -99,7 +99,7 @@ pic_push_try(pic_state *pic)
|
||||||
struct pic_proc *cont, *handler;
|
struct pic_proc *cont, *handler;
|
||||||
size_t xp_len, xp_offset;
|
size_t xp_len, xp_offset;
|
||||||
|
|
||||||
cont = pic_make_cont(pic, escape);
|
cont = pic_make_econt(pic, escape);
|
||||||
|
|
||||||
handler = pic_make_proc(pic, native_exception_handler, "(native-exception-handler)");
|
handler = pic_make_proc(pic, native_exception_handler, "(native-exception-handler)");
|
||||||
|
|
||||||
|
|
|
@ -29,7 +29,7 @@ struct pic_escape {
|
||||||
int pic_save_point(pic_state *, struct pic_escape *);
|
int pic_save_point(pic_state *, struct pic_escape *);
|
||||||
noreturn void pic_load_point(pic_state *, struct pic_escape *);
|
noreturn void pic_load_point(pic_state *, struct pic_escape *);
|
||||||
|
|
||||||
struct pic_proc *pic_make_cont(pic_state *, struct pic_escape *);
|
struct pic_proc *pic_make_econt(pic_state *, struct pic_escape *);
|
||||||
|
|
||||||
void pic_wind(pic_state *, struct pic_winder *, struct pic_winder *);
|
void pic_wind(pic_state *, struct pic_winder *, struct pic_winder *);
|
||||||
pic_value pic_dynamic_wind(pic_state *, struct pic_proc *, struct pic_proc *, struct pic_proc *);
|
pic_value pic_dynamic_wind(pic_state *, struct pic_proc *, struct pic_proc *, struct pic_proc *);
|
||||||
|
|
Loading…
Reference in New Issue