Kouhei Sutou
kou****@cozmi*****
2008年 6月 30日 (月) 09:14:47 JST
須藤です。 sen_ql_feed()はNILかFを返すと思うのですが、それぞれ以下のような 意味でよいでしょうか？ * NIL: 成功 * F: 失敗 もし、↑だとすると、sen_ctx_load()でのsen_ql_feed()の戻り値チェック は逆のような気がします。 Index: lib/scm.c =================================================================== --- lib/scm.c (revision 872) +++ lib/scm.c (working copy) @@ -786,7 +786,7 @@ sen_ctx_load(sen_ctx *ctx, const char *filename) ctx->args = CONS(mk_const_string(ctx, filename), NIL); ctx->stat = SEN_QL_TOPLEVEL; ctx->op = OP_LOAD; - return sen_ql_feed(ctx, "init", 4, 0) == F ? sen_success : sen_internal_error; + return sen_ql_feed(ctx, "init", 4, 0) == F ? sen_internal_error : sen_success; } /* ========== Routines for Reading ========== */
