Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
2530ceaf
Commit
2530ceaf
authored
May 29, 2002
by
Colin Walters
Browse files
Fix previous change (oops).
parent
5135ab39
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
1 deletion
+3
-1
src/lread.c
src/lread.c
+3
-1
No files found.
src/lread.c
View file @
2530ceaf
...
...
@@ -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
));
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment