控え

throw_cont_cc() 手続きを投入しようとしたら

$ perl ./post_code_reading.pl vm.c throw_cont_cc `./post_gauche_reading.scm`
static ScmObj throw_cont_cc(ScmObj result, void **data)
{
    ScmObj handlers = SCM_OBJ(data[0]);
    ScmEscapePoint *ep = (ScmEscapePoint *)data[1];
    ScmObj args = SCM_OBJ(data[2]);
    return throw_cont_body(handlers, ep, args);
}
*** page already exist ***
$

と言われる。なんかおかしいな。コード少ないので手で入れるか。

あら?

よく考えたら認証なナニが変更になったのが関係してるのかな。