mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-06 11:55:48 +00:00
Code Issues Releases Activity

(read_vector): Follow error conventions.

Browse Source
This commit is contained in:
Juanma Barranquero 2005-06-23 16:10:06 +00:00
parent b5251fe73a
commit 6fa2b890d4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/lread.c
View File

@ -2845,7 +2845,7 @@ read_vector (readcharfun, bytecodeflag)
if (i == COMPILED_BYTECODE)
{
if (!STRINGP (item))
error ("invalid byte code");
error ("Invalid byte code");
/* Delay handling the bytecode slot until we know whether
it is lazily-loaded (we can tell by whether the
@ -2867,7 +2867,7 @@ read_vector (readcharfun, bytecodeflag)
item = Fread (bytestr);
if (!CONSP (item))
error ("invalid byte code");
error ("Invalid byte code");
otem = XCONS (item);
bytestr = XCAR (item);