procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Writing Emacs Primitives): Update `or' example.

Browse source 
Update limit on # args of subr.
This commit is contained in:
Richard M. Stallman 2005-03-08 03:06:53 +00:00
parent 937dbf8c44
commit 51485df27d
1 changed files with 7 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
lispref/internals.texi
View file

@ -477,28 +477,22 @@ usage: (or CONDITIONS ...) */)
(args)
Lisp_Object args;
@{
register Lisp_Object val;
Lisp_Object args_left;
register Lisp_Object val = Qnil;
struct gcpro gcpro1;
@end group
@group
if (NILP (args))
return Qnil;
args_left = args;
GCPRO1 (args_left);
GCPRO1 (args);
@end group
@group
do
while (CONSP (args))
@{
val = Feval (Fcar (args_left));
val = Feval (XCAR (args));
if (!NILP (val))
break;
args_left = Fcdr (args_left);
break;
args = XCDR (args);
@}
while (!NILP (args_left));
@end group
@group
@ -549,7 +543,7 @@ indicating a special form that receives unevaluated arguments, or
@code{MANY}, indicating an unlimited number of evaluated arguments (the
equivalent of @code{&rest}). Both @code{UNEVALLED} and @code{MANY} are
macros. If @var{max} is a number, it may not be less than @var{min} and
it may not be greater than seven.
it may not be greater than eight.
@item interactive
This is an interactive specification, a string such as might be used as