Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing brace literals for primitive objects containing non-trailing raw nulls

Browse source
This commit is contained in:
Alex Shinn 2015-07-11 21:07:17 +09:00
parent 9959f90b7a
commit fe75dbfff5
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
sexp.c
View file

@ -108,8 +108,8 @@ sexp sexp_write_simple_object (sexp ctx, sexp self, sexp_sint_t n, sexp obj, sex
for (i=0; i<len; i++) { for (i=0; i<len; i++) {
x = sexp_slot_ref(obj, i); x = sexp_slot_ref(obj, i);
if (x) { if (x) {
if (nulls) for ( ; nulls; --nulls)
while (--nulls) sexp_write_string(ctx, " #<null>", out); sexp_write_string(ctx, " #f", out);
sexp_write_char(ctx, ' ', out); sexp_write_char(ctx, ' ', out);
if (writer && sexp_applicablep(writer)) { if (writer && sexp_applicablep(writer)) {
sexp_car(args) = x; sexp_car(args) = x;