static pic_value pic_cont_callcc(pic_state *pic) { struct pic_proc *cb; pic_get_args(pic, "l", &cb); return pic_callcc(pic, cb); }
static pic_value pic_callcc_callcc(pic_state *pic) { pic_value proc; pic_get_args(pic, "l", &proc); return pic_callcc(pic, proc); }