Mercurial > emacs

diff src/lread.c @ 45577:30f1ddc50732

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix previous change (oops).
author Colin Walters <walters@gnu.org>
date Wed, 29 May 2002 18:58:38 +0000
parents 0a94e1efe9fc
children 2049fa380cb1
line wrap: on
line diff
--- a/src/lread.c	Wed May 29 18:57:57 2002 +0000
+++ b/src/lread.c	Wed May 29 18:58:38 2002 +0000
@@ -1480,8 +1480,10 @@
      (string, start, end)
      Lisp_Object string, start, end;
 {
+  Lisp_Object ret;
   CHECK_STRING (string);
-  Lisp_Object ret = read_internal_start (string, start, end);
+  /* read_internal_start sets read_from_string_index. */
+  ret = read_internal_start (string, start, end);
   return Fcons (ret, make_number (read_from_string_index));
 }