typo in assertion

This commit is contained in:
Alex Shinn 2011-04-04 05:37:31 +00:00
parent 0257ab38c6
commit 70a5e46727

2
sexp.c
View file

@ -1152,7 +1152,7 @@ sexp sexp_make_output_string_port_op (sexp ctx sexp_api_params(self, n)) {
} }
sexp sexp_get_output_string_op (sexp ctx sexp_api_params(self, n), sexp port) { sexp sexp_get_output_string_op (sexp ctx sexp_api_params(self, n), sexp port) {
sexp_assert_type(ctx, sexp_oportp, SEXP_OPORT, out); sexp_assert_type(ctx, sexp_oportp, SEXP_OPORT, port);
fflush(sexp_port_stream(port)); fflush(sexp_port_stream(port));
return sexp_c_string(ctx, sexp_port_buf(port), sexp_port_size(port)); return sexp_c_string(ctx, sexp_port_buf(port), sexp_port_size(port));
} }