diff options
| author | Richard M. Stallman | 1994-04-11 21:11:22 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-04-11 21:11:22 +0000 |
| commit | 87d238bafe288fa4560c9e1ffb7b56c3598cabab (patch) | |
| tree | 52092c52013461454ac16bfd4347bffd6e08f868 /src | |
| parent | a8920a1789bc8d59603e492abf3007b25882ab37 (diff) | |
| download | emacs-87d238bafe288fa4560c9e1ffb7b56c3598cabab.tar.gz emacs-87d238bafe288fa4560c9e1ffb7b56c3598cabab.zip | |
(Fsetq): Doc fix.
Diffstat (limited to 'src')
| -rw-r--r-- | src/eval.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/eval.c b/src/eval.c index 6255cc3baa3..fa67a453f30 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -390,7 +390,7 @@ whose values are discarded.") | |||
| 390 | 390 | ||
| 391 | val = Qnil; | 391 | val = Qnil; |
| 392 | 392 | ||
| 393 | if (NILP(args)) | 393 | if (NILP (args)) |
| 394 | return Qnil; | 394 | return Qnil; |
| 395 | 395 | ||
| 396 | args_left = args; | 396 | args_left = args; |
| @@ -405,7 +405,7 @@ whose values are discarded.") | |||
| 405 | Feval (Fcar (args_left)); | 405 | Feval (Fcar (args_left)); |
| 406 | args_left = Fcdr (args_left); | 406 | args_left = Fcdr (args_left); |
| 407 | } | 407 | } |
| 408 | while (!NILP(args_left)); | 408 | while (!NILP (args_left)); |
| 409 | 409 | ||
| 410 | UNGCPRO; | 410 | UNGCPRO; |
| 411 | return val; | 411 | return val; |
| @@ -414,7 +414,7 @@ whose values are discarded.") | |||
| 414 | DEFUN ("setq", Fsetq, Ssetq, 0, UNEVALLED, 0, | 414 | DEFUN ("setq", Fsetq, Ssetq, 0, UNEVALLED, 0, |
| 415 | "(setq SYM VAL SYM VAL ...): set each SYM to the value of its VAL.\n\ | 415 | "(setq SYM VAL SYM VAL ...): set each SYM to the value of its VAL.\n\ |
| 416 | The SYMs are not evaluated. Thus (setq x y) sets x to the value of y.\n\ | 416 | The SYMs are not evaluated. Thus (setq x y) sets x to the value of y.\n\ |
| 417 | Each SYM is set before the next VAL is computed. | 417 | Each SYM is set before the next VAL is computed.\n\ |
| 418 | The return value of the `setq' form is the value of the last VAL.") | 418 | The return value of the `setq' form is the value of the last VAL.") |
| 419 | (args) | 419 | (args) |
| 420 | Lisp_Object args; | 420 | Lisp_Object args; |