# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1135911587 0
# Node ID 7c797468d04b659266a31b1acb2ed9f2ff7afc2e
# Parent  bd49367311fe64c6abfc192fb2b5e927c3979aaf
(noreturn, 1value): Doc fixes.

diff -r bd49367311fe -r 7c797468d04b lisp/subr.el
--- a/lisp/subr.el	Fri Dec 30 02:58:25 2005 +0000
+++ b/lisp/subr.el	Fri Dec 30 02:59:47 2005 +0000
@@ -42,17 +42,15 @@
 (defalias 'not 'null)
 
 (defmacro noreturn (form)
-  "Evaluates FORM, with the expectation that the evaluation will signal an error
-instead of returning to its caller.  If FORM does return, an error is
-signaled."
+  "Evaluate FORM, expecting it not to return.
+If FORM does return, signal an error."
   `(prog1 ,form
      (error "Form marked with `noreturn' did return")))
 
 (defmacro 1value (form)
-  "Evaluates FORM, with the expectation that the same value will be returned
-from all evaluations of FORM.  This is the global do-nothing
-version of `1value'.  There is also `testcover-1value' that
-complains if FORM ever does return differing values."
+  "Evaluate FORM, expecting a constant return value.
+This is the global do-nothing version.  There is also `testcover-1value'
+that complains if FORM ever does return differing values."
   form)
 
 (defmacro lambda (&rest cdr)