286 |
doc: /* Eval args until one of them yields non-nil, then return that value. |
doc: /* Eval args until one of them yields non-nil, then return that value. |
287 |
The remaining args are not evalled at all. |
The remaining args are not evalled at all. |
288 |
If all args return nil, return nil. |
If all args return nil, return nil. |
289 |
usage: (or &rest CONDITIONS) */) |
usage: (or CONDITIONS ...) */) |
290 |
(args) |
(args) |
291 |
Lisp_Object args; |
Lisp_Object args; |
292 |
{ |
{ |
317 |
doc: /* Eval args until one of them yields nil, then return nil. |
doc: /* Eval args until one of them yields nil, then return nil. |
318 |
The remaining args are not evalled at all. |
The remaining args are not evalled at all. |
319 |
If no arg yields nil, return the last arg's value. |
If no arg yields nil, return the last arg's value. |
320 |
usage: (and &rest CONDITIONS) */) |
usage: (and CONDITIONS ...) */) |
321 |
(args) |
(args) |
322 |
Lisp_Object args; |
Lisp_Object args; |
323 |
{ |
{ |
349 |
Returns the value of THEN or the value of the last of the ELSE's. |
Returns the value of THEN or the value of the last of the ELSE's. |
350 |
THEN must be one expression, but ELSE... can be zero or more expressions. |
THEN must be one expression, but ELSE... can be zero or more expressions. |
351 |
If COND yields nil, and there are no ELSE's, the value is nil. |
If COND yields nil, and there are no ELSE's, the value is nil. |
352 |
usage: (if COND THEN &rest ELSE) */) |
usage: (if COND THEN ELSE...) */) |
353 |
(args) |
(args) |
354 |
Lisp_Object args; |
Lisp_Object args; |
355 |
{ |
{ |
374 |
If no clause succeeds, cond returns nil. |
If no clause succeeds, cond returns nil. |
375 |
If a clause has one element, as in (CONDITION), |
If a clause has one element, as in (CONDITION), |
376 |
CONDITION's value if non-nil is returned from the cond-form. |
CONDITION's value if non-nil is returned from the cond-form. |
377 |
usage: (cond &rest CLAUSES) */) |
usage: (cond CLAUSES...) */) |
378 |
(args) |
(args) |
379 |
Lisp_Object args; |
Lisp_Object args; |
380 |
{ |
{ |
402 |
|
|
403 |
DEFUN ("progn", Fprogn, Sprogn, 0, UNEVALLED, 0, |
DEFUN ("progn", Fprogn, Sprogn, 0, UNEVALLED, 0, |
404 |
doc: /* Eval BODY forms sequentially and return value of last one. |
doc: /* Eval BODY forms sequentially and return value of last one. |
405 |
usage: (progn &rest BODY) */) |
usage: (progn BODY ...) */) |
406 |
(args) |
(args) |
407 |
Lisp_Object args; |
Lisp_Object args; |
408 |
{ |
{ |
443 |
doc: /* Eval FIRST and BODY sequentially; value from FIRST. |
doc: /* Eval FIRST and BODY sequentially; value from FIRST. |
444 |
The value of FIRST is saved during the evaluation of the remaining args, |
The value of FIRST is saved during the evaluation of the remaining args, |
445 |
whose values are discarded. |
whose values are discarded. |
446 |
usage: (prog1 FIRST &rest BODY) */) |
usage: (prog1 FIRST BODY...) */) |
447 |
(args) |
(args) |
448 |
Lisp_Object args; |
Lisp_Object args; |
449 |
{ |
{ |
477 |
doc: /* Eval X, Y and BODY sequentially; value from Y. |
doc: /* Eval X, Y and BODY sequentially; value from Y. |
478 |
The value of Y is saved during the evaluation of the remaining args, |
The value of Y is saved during the evaluation of the remaining args, |
479 |
whose values are discarded. |
whose values are discarded. |
480 |
usage: (prog2 X Y &rest BODY) */) |
usage: (prog2 X Y BODY...) */) |
481 |
(args) |
(args) |
482 |
Lisp_Object args; |
Lisp_Object args; |
483 |
{ |
{ |
637 |
doc: /* Define NAME as a function. |
doc: /* Define NAME as a function. |
638 |
The definition is (lambda ARGLIST [DOCSTRING] BODY...). |
The definition is (lambda ARGLIST [DOCSTRING] BODY...). |
639 |
See also the function `interactive'. |
See also the function `interactive'. |
640 |
usage: (defun NAME ARGLIST &optional DOCSTRING &rest BODY) */) |
usage: (defun NAME ARGLIST [DOCSTRING] BODY...) */) |
641 |
(args) |
(args) |
642 |
Lisp_Object args; |
Lisp_Object args; |
643 |
{ |
{ |
660 |
the function (lambda ARGLIST BODY...) is applied to |
the function (lambda ARGLIST BODY...) is applied to |
661 |
the list ARGS... as it appears in the expression, |
the list ARGS... as it appears in the expression, |
662 |
and the result should be a form to be evaluated instead of the original. |
and the result should be a form to be evaluated instead of the original. |
663 |
usage: (defmacro NAME ARGLIST &optional DOCSTRING &rest BODY) */) |
usage: (defmacro NAME ARGLIST [DOCSTRING] BODY...) */) |
664 |
(args) |
(args) |
665 |
Lisp_Object args; |
Lisp_Object args; |
666 |
{ |
{ |
760 |
If SYMBOL is buffer-local, its default value is what is set; |
If SYMBOL is buffer-local, its default value is what is set; |
761 |
buffer-local values are not affected. |
buffer-local values are not affected. |
762 |
DOCSTRING is optional. |
DOCSTRING is optional. |
763 |
usage: (defconst SYMBOL INITVALUE &optional DOCSTRING) */) |
usage: (defconst SYMBOL INITVALUE [DOCSTRING]) */) |
764 |
(args) |
(args) |
765 |
Lisp_Object args; |
Lisp_Object args; |
766 |
{ |
{ |
826 |
Each element of VARLIST is a symbol (which is bound to nil) |
Each element of VARLIST is a symbol (which is bound to nil) |
827 |
or a list (SYMBOL VALUEFORM) (which binds SYMBOL to the value of VALUEFORM). |
or a list (SYMBOL VALUEFORM) (which binds SYMBOL to the value of VALUEFORM). |
828 |
Each VALUEFORM can refer to the symbols already bound by this VARLIST. |
Each VALUEFORM can refer to the symbols already bound by this VARLIST. |
829 |
usage: (let* VARLIST &rest BODY) */) |
usage: (let* VARLIST BODY...) */) |
830 |
(args) |
(args) |
831 |
Lisp_Object args; |
Lisp_Object args; |
832 |
{ |
{ |
865 |
Each element of VARLIST is a symbol (which is bound to nil) |
Each element of VARLIST is a symbol (which is bound to nil) |
866 |
or a list (SYMBOL VALUEFORM) (which binds SYMBOL to the value of VALUEFORM). |
or a list (SYMBOL VALUEFORM) (which binds SYMBOL to the value of VALUEFORM). |
867 |
All the VALUEFORMs are evalled before any symbols are bound. |
All the VALUEFORMs are evalled before any symbols are bound. |
868 |
usage: (let VARLIST &rest BODY) */) |
usage: (let VARLIST BODY...) */) |
869 |
(args) |
(args) |
870 |
Lisp_Object args; |
Lisp_Object args; |
871 |
{ |
{ |
921 |
doc: /* If TEST yields non-nil, eval BODY... and repeat. |
doc: /* If TEST yields non-nil, eval BODY... and repeat. |
922 |
The order of execution is thus TEST, BODY, TEST, BODY and so on |
The order of execution is thus TEST, BODY, TEST, BODY and so on |
923 |
until TEST returns nil. |
until TEST returns nil. |
924 |
usage: (while TEST &rest BODY) */) |
usage: (while TEST BODY...) */) |
925 |
(args) |
(args) |
926 |
Lisp_Object args; |
Lisp_Object args; |
927 |
{ |
{ |
1030 |
Within BODY, (throw TAG) with same tag exits BODY and exits this `catch'. |
Within BODY, (throw TAG) with same tag exits BODY and exits this `catch'. |
1031 |
If no throw happens, `catch' returns the value of the last BODY form. |
If no throw happens, `catch' returns the value of the last BODY form. |
1032 |
If a throw happens, it specifies the value to return from `catch'. |
If a throw happens, it specifies the value to return from `catch'. |
1033 |
usage: (catch TAG &rest BODY) */) |
usage: (catch TAG BODY...) */) |
1034 |
(args) |
(args) |
1035 |
Lisp_Object args; |
Lisp_Object args; |
1036 |
{ |
{ |
1159 |
If BODYFORM completes normally, its value is returned |
If BODYFORM completes normally, its value is returned |
1160 |
after executing the UNWINDFORMS. |
after executing the UNWINDFORMS. |
1161 |
If BODYFORM exits nonlocally, the UNWINDFORMS are executed anyway. |
If BODYFORM exits nonlocally, the UNWINDFORMS are executed anyway. |
1162 |
usage: (unwind-protect BODYFORM &rest UNWINDFORMS) */) |
usage: (unwind-protect BODYFORM UNWINDFORMS...) */) |
1163 |
(args) |
(args) |
1164 |
Lisp_Object args; |
Lisp_Object args; |
1165 |
{ |
{ |
1199 |
|
|
1200 |
The value of the last BODY form is returned from the condition-case. |
The value of the last BODY form is returned from the condition-case. |
1201 |
See also the function `signal' for more info. |
See also the function `signal' for more info. |
1202 |
usage: (condition-case VAR BODYFORM &rest HANDLERS) */) |
usage: (condition-case VAR BODYFORM HANDLERS...) */) |
1203 |
(args) |
(args) |
1204 |
Lisp_Object args; |
Lisp_Object args; |
1205 |
{ |
{ |