Make entries on etypecase/ctypecase and ecase/ccase more consistent

trebb · Apr 5, 2012 · e6b87e8 · e6b87e8
1 parent 6820693
commit e6b87e8
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 14 deletions.
diff --git a/clqr-control-structure.tex b/clqr-control-structure.tex
@@ -627,9 +627,9 @@ \subsection{Control Flow}
         \NEV{\VAR{key}}}{\}} \PROGN{\VAR{foo}})})}
   {
     Return the \retval{values} of the first \OPn{\VAR{foo}} one of
-    whose \VAR{key}s is \kwd{eql} \VAR{test}. Signal
-    non-correctable/correctable \kwd{type-error} and return
-    \retval{\NIL} if there is no matching \VAR{key}.
+    whose \VAR{key}s is \kwd{eql} \VAR{test}.  Signal
+    non-correctable/correctable \kwd{type-error} if there is no
+    matching \VAR{key}.
   }
 
   \IT{(\MC*{AND} \OPn{\VAR{form}}\DF{\T})}

diff --git a/clqr-types-and-classes.tex b/clqr-types-and-classes.tex
@@ -1,4 +1,4 @@
-% Copyright (C) 2008, 2009, 2010, 2011 Bert Burgemeister
+% Copyright (C) 2008, 2009, 2010, 2011, 2012 Bert Burgemeister
 %
 % Permission is granted to copy, distribute and/or modify this
 % document under the terms of the GNU Free Documentation License,
@@ -158,23 +158,25 @@ \section{Types and Classes}
     \OP{(\xorGOO{\kwd*{OTHERWISE}\\
         \T}{\}} \PROGN{\VAR{b-form}\DF{\NIL}})})}
   {
-  Return \retval{values of the \VAR{a-form}s} whose \VAR{type} is
-  \VAR{foo} of. Return \retval{values of \VAR{b-form}s} if no
-  \VAR{type} matches.
+    Return \retval{values of the \VAR{a-form}s} whose \VAR{type} is
+    \VAR{foo} of. Return \retval{values of \VAR{b-form}s} if no
+    \VAR{type} matches.
   }
 
-  \IT{(\xorGOO{\MC*{CTYPECASE}\\
-      \MC*{ETYPECASE}}{\}} \VAR{foo} \OPn{(\NEV{\VAR{type}}
-      \PROGN{\VAR{form}})})}
+  \IT{(\xorGOO{%
+      \MC*{ETYPECASE}\\
+      \MC*{CTYPECASE}}{\}}
+    \VAR{foo}
+    \OPn{(\NEV{\VAR{type}} \PROGN{\VAR{form}})})}
   {
-  Return \retval{values of the \VAR{form}s} whose \VAR{type} is
-  \VAR{foo} of. Signal correctable/non-correctable error, respectively
-  if no \VAR{type} matches.
+    Return \retval{values} of the first \OPn{\VAR{form}} whose \VAR{type} is
+    \VAR{foo} of.  Signal non-correctable/correctable \kwd{type-error}
+    if no \VAR{type} matches.
   }
 
   \IT{(\FU*{TYPE-OF} \VAR{foo})}
   {
-  \retval{Type of \VAR{foo}}.
+    \retval{Type of \VAR{foo}}.
   }
 
   \IT{(\MC*{CHECK-TYPE} \VAR{place} \VAR{type}