mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-19 04:21:45 -07:00
Code Issues Projects Releases Wiki Activity

Fix previous change (oops).

Browse source
This commit is contained in:
Colin Walters 2002-05-29 18:58:38 +00:00
parent 5135ab39fb
commit 2530ceaf86
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/lread.c
View file

@ -1480,8 +1480,10 @@ START and END optionally delimit a substring of STRING from which to read;
(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));
}