aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1997-01-11 00:28:16 +0000
committerRichard M. Stallman1997-01-11 00:28:16 +0000
commit039dc30b045dc0ba0633aee0d71020daf8c50f48 (patch)
tree2960dc8ecd3994ce7fab026d508d8a7dbf802fe5 /src
parent988dff5e886ad9d68214a257e456d271a98f814f (diff)
downloademacs-039dc30b045dc0ba0633aee0d71020daf8c50f48.tar.gz
emacs-039dc30b045dc0ba0633aee0d71020daf8c50f48.zip
(read1): Fix error messages.
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 {