(read_vector): Follow error conventions.

diff --git a/src/lread.c b/src/lread.c
index b0262ebea79e967b7e25fe3b01ae0b63ef42740f..9317933013ee54ad52aaea25fd6dbd33e6b93c50 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -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);