aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/lread.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c
index 647735c8555..7b73425f568 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1269,14 +1269,15 @@ read1 (readcharfun, pch, first_in_list)
1269 tmp = read1 (readcharfun, pch, first_in_list); 1269 tmp = read1 (readcharfun, pch, first_in_list);
1270 if (size_in_chars != XSTRING (tmp)->size) 1270 if (size_in_chars != XSTRING (tmp)->size)
1271 Fsignal (Qinvalid_read_syntax, 1271 Fsignal (Qinvalid_read_syntax,
1272 Fcons (make_string ("#&", 2), Qnil)); 1272 Fcons (make_string ("#&...", 2), Qnil));
1273 1273
1274 val = Fmake_bool_vector (length, Qnil); 1274 val = Fmake_bool_vector (length, Qnil);
1275 bcopy (XSTRING (tmp)->data, XBOOL_VECTOR (val)->data, 1275 bcopy (XSTRING (tmp)->data, XBOOL_VECTOR (val)->data,
1276 size_in_chars); 1276 size_in_chars);
1277 return val; 1277 return val;
1278 } 1278 }
1279 Fsignal (Qinvalid_read_syntax, Fcons (make_string ("#&", 2), Qnil)); 1279 Fsignal (Qinvalid_read_syntax, Fcons (make_string ("#&...", 2),
1280 Qnil));
1280 } 1281 }
1281 if (c == '[') 1282 if (c == '[')
1282 { 1283 {