[Emacs-diffs] Changes to emacs/src/lread.c

[Colin Walters]

Index: emacs/src/lread.c
diff -c emacs/src/lread.c:1.285 emacs/src/lread.c:1.286
*** emacs/src/lread.c:1.285     Tue May 28 12:24:55 2002
--- emacs/src/lread.c   Wed May 29 14:57:57 2002
***************
*** 1481,1488 ****
       Lisp_Object string, start, end;
  {
    CHECK_STRING (string);
!   return Fcons (read_internal_start (string, start, end),
!               make_number (read_from_string_index));
  }
  
  /* Function to set up the global context we need in toplevel read
--- 1481,1488 ----
       Lisp_Object string, start, end;
  {
    CHECK_STRING (string);
!   Lisp_Object ret = read_internal_start (string, start, end);
!   return Fcons (ret, make_number (read_from_string_index));
  }
  
  /* Function to set up the global context we need in toplevel read