\begin{describe}{mac}{aif @<condition> @<consequent> @[@<alt>@]}
\end{describe}
+\begin{describe}{mac}{aand @<form>^*}
+\end{describe}
+
\begin{describe}{mac}{awhen @<condition> @<form>^*}
\end{describe}
\end{describe}
\begin{describe}{fun}
- {merge-lists @<lists> \&key :pick (:test \#'eql) @> @<list>}
+ {merge-lists @<lists> \&key :pick (:test \#'eql) :present @> @<list>}
\end{describe}
\begin{describe}{mac}
\\ \ind\ind
(@{ (@<cat-var> @<cat-predicate>) @}^*) \-\\
@<declaration>^* \\
- @<body-form>^*
+ @<form>^*
\-\nlret @<value>^*}
\end{describe}
+\begin{describe}{fun}{partial-order-minima @<items> @<order> @> @<list>}
+\end{describe}
+
\begin{describe}{fun}
{frob-identifier @<string> \&key :swap-case :swap-hyphen
@> @<frobbed-string>}
{compose @<function> \&rest @<more-functions> @> @<function>}
\end{describe}
+\begin{describe}{mac}{defvar @<name> @<documentation> @> @<name>}
+\end{describe}
+
\begin{describe}{fun}{symbolicate \&rest @<symbols> @> @<symbol>}
\end{describe}
@[[ :read-only @<read-only-flag> @]]}
\end{describe}
+\begin{describe}{fun}
+ {designated-condition
+ \=@<default-type> @<datum> @<arguments> \\
+ \>\&key :allow-pointless-arguments
+ \nlret @<condition>}
+\end{describe}
+
\begin{describe}{mac}
{default-slot (@<instance> @<slot> @[@<slot-names>@]) \\ \ind
@<form>^*}
{enclosed-condition @<enclosing-condition> @> @<condition>}
\end{describe}
+\begin{describe}{cls}{information (condition) \&key}
+\end{describe}
+
+\begin{describe}{cls}
+ {simple-information (simple-condition information) \\ \ind
+ \&key :format-control :format-arguments}
+\end{describe}
+
+\begin{describe}{fun}{info @<datum> \&rest @<arguments> @> @<flag>}
+\end{describe}
+
+\begin{describe}{rst}{noted}
+\end{describe}
+
\begin{describe}{fun}{cerror* @<datum> \&rest @<arguments>}
\end{describe}
@<default-form>^*}
\end{describe}
+\begin{describe}{fun}
+ {parse-property @<scanner> @<pset>
+ @> @<result> @<success-flag> @<consumed-flag>}
+\end{describe}
+
\begin{describe}{fun}
{parse-property-set @<scanner>
@> @<result> @<success-flag> @<consumed-flag>}
\begin{describe}{var}{*debugout-pathname*}
\end{describe}
-\begin{describe}{fun}{test-module @<path> @<reason>}
+\begin{describe}{fun}
+ {test-module @<path> \&key :reason :clear :backtrace @> @<status>}
\end{describe}
\begin{describe}{fun}
\end{describe}
\begin{describe}{mac}
- {test-parser (@<scanner>) @<parser> @<input>
- @> @<success-flag> @<result> @<remainder>}
+ {test-parser (@<scanner> \&key :backtrace) @<parser> @<input>
+ @> @<result> @<status> @<remainder>}
\end{describe}
\begin{describe}{fun}{exercise}