# HG changeset patch # User Aidan Kehoe # Date 1323533869 0 # Node ID d69ea1ff4ce30fd1d8a0ddb169bd404c556d617e # Parent 3152c2c214612b81eb7bba521081b6a54e0145e9 Add the zero, *then* flush, when reading integers for the #N=... syntax. src/ChangeLog addition: 2011-12-10 Aidan Kehoe * lread.c (read1): Add the zero, *then* flush, when reading an integer into Vread_buffer_stream. diff -r 3152c2c21461 -r d69ea1ff4ce3 src/ChangeLog --- a/src/ChangeLog Fri Dec 09 08:38:07 2011 +0000 +++ b/src/ChangeLog Sat Dec 10 16:17:49 2011 +0000 @@ -1,3 +1,8 @@ +2011-12-10 Aidan Kehoe + + * lread.c (read1): Add the zero, *then* flush, when reading an + integer into Vread_buffer_stream. + 2011-12-04 Aidan Kehoe * Makefile.in.in (objs): diff -r 3152c2c21461 -r d69ea1ff4ce3 src/lread.c --- a/src/lread.c Fri Dec 09 08:38:07 2011 +0000 +++ b/src/lread.c Sat Dec 10 16:17:49 2011 +0000 @@ -2710,9 +2710,9 @@ c = readchar (readcharfun); } - Lstream_flush (XLSTREAM (Vread_buffer_stream)); /* blasted terminating 0 */ Lstream_put_ichar (XLSTREAM (Vread_buffer_stream), 0); + Lstream_flush (XLSTREAM (Vread_buffer_stream)); parsed = parse_integer (resizing_buffer_stream_ptr