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

Writing out the pointer value of unwritable types.

Browse source
This commit is contained in:
Alex Shinn 2013-10-10 16:27:30 +09:00
parent 67c9e7ca7c
commit 3995c4505f
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
sexp.c
View file

@ -2000,6 +2000,8 @@ sexp sexp_write_one (sexp ctx, sexp obj, sexp out) {
sexp_write_string(ctx, sexp_string_data(sexp_type_name(x)), out); sexp_write_string(ctx, sexp_string_data(sexp_type_name(x)), out);
else else
sexp_write(ctx, sexp_type_name(x), out); sexp_write(ctx, sexp_type_name(x), out);
sexp_write_char(ctx, ' ', out);
sexp_write(ctx, sexp_make_fixnum(obj), out);
sexp_write_char(ctx, '>', out); sexp_write_char(ctx, '>', out);
#if SEXP_USE_TYPE_PRINTERS #if SEXP_USE_TYPE_PRINTERS
} }