I wrote:
>   (raise (make-i/o-decoding-error port))
>
> This can be written in C as follows:
>
>   scm_call_1 (scm_c_public_ref ("rnrs exceptions", "raise"),
>               scm_call_1 (scm_c_public_ref ("rnrs io ports",
>                                             "make-i/o-decoding-error")));

Sorry, I forgot to pass 'port'.  It should be:

   scm_call_1 (scm_c_public_ref ("rnrs exceptions", "raise"),
               scm_call_1 (scm_c_public_ref ("rnrs io ports",
                                             "make-i/o-decoding-error"),
                           port));

       Mark

Reply via email to