# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 766098682 0
# Node ID 656d16ca0419133c38be219ede12cc14d0694d21
# Parent  7d69da13c14047a22fba6f4aa5fde4c45cf36713
(Fsetq): Doc fix.

diff -r 7d69da13c140 -r 656d16ca0419 src/eval.c
--- a/src/eval.c	Mon Apr 11 21:10:48 1994 +0000
+++ b/src/eval.c	Mon Apr 11 21:11:22 1994 +0000
@@ -390,7 +390,7 @@
 
   val = Qnil;
 
-  if (NILP(args))
+  if (NILP (args))
     return Qnil;
 
   args_left = args;
@@ -405,7 +405,7 @@
 	Feval (Fcar (args_left));
       args_left = Fcdr (args_left);
     }
-  while (!NILP(args_left));
+  while (!NILP (args_left));
 
   UNGCPRO;
   return val;
@@ -414,7 +414,7 @@
 DEFUN ("setq", Fsetq, Ssetq, 0, UNEVALLED, 0,
   "(setq SYM VAL SYM VAL ...): set each SYM to the value of its VAL.\n\
 The SYMs are not evaluated.  Thus (setq x y) sets x to the value of y.\n\
-Each SYM is set before the next VAL is computed.
+Each SYM is set before the next VAL is computed.\n\
 The return value of the `setq' form is the value of the last VAL.")
   (args)
      Lisp_Object args;