X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/3e21ae3fa660b188bc20caec8c96c1f678405c25..64a7e6515e1e585b420c1c14acda9be9ff84c3db:/doc/misc.tex

diff --git a/doc/misc.tex b/doc/misc.tex
index 06791f4..c253630 100644
--- a/doc/misc.tex
+++ b/doc/misc.tex
@@ -30,16 +30,19 @@
 
 These symbols are defined in the @|sod-utilities| package.
 
+
+\subsection{Macro utilities}
+
 \begin{describe}{mac}
-    {with-gensyms (@{ @<var> @! (@<var> @[@<name>@]) @}^*) \\ \ind
-      @<declaration>^* \\
+    {with-gensyms (@{ @<var> @! (@<var> @[@<name>@]) @}^*)      \\ \ind
+      @<declaration>^*                                          \\
       @<form>^*}
 \end{describe}
 
 \begin{describe}{mac}
     {once-only (@[[ :environment @<env> @]]
-                @{ @<var> @! (@<var> @[@<value-form>@]) @}^*) \\ \ind
-      @<declaration>^* \\
+                @{ @<var> @! (@<var> @[@<value-form>@]) @}^*)   \\ \ind
+      @<declaration>^*                                          \\
       @<form>^*}
 \end{describe}
 
@@ -51,6 +54,12 @@ These symbols are defined in the @|sod-utilities| package.
 \begin{describe}{cls}{loc}
 \end{describe}
 
+\begin{describe}{fun}{symbolicate \&rest @<symbols> @> @<symbol>}
+\end{describe}
+
+
+\subsection{Locatives}
+
 \begin{describe}{fun}{locp @<object> @> @<generalized-boolean>}
 \end{describe}
 
@@ -65,17 +74,23 @@ These symbols are defined in the @|sod-utilities| package.
 \begin{describe}{mac}
     {with-locatives
         @{ @<var> @! (@{ @<var> @!
-                         (@<var> @[@<locative>@]) @}^*) @} \\ \ind
-      @<declaration>^* \\
+                         (@<var> @[@<locative>@]) @}^*) @}      \\ \ind
+      @<declaration>^*                                          \\
       @<form>^*}
 \end{describe}
 
+
+\subsection{Anaphorics}
+
 \begin{describe}{sym}{it}
 \end{describe}
 
 \begin{describe}{mac}{aif @<condition> @<consequent> @[@<alt>@]}
 \end{describe}
 
+\begin{describe}{mac}{aand @<form>^*}
+\end{describe}
+
 \begin{describe}{mac}{awhen @<condition> @<form>^*}
 \end{describe}
 
@@ -94,6 +109,9 @@ These symbols are defined in the @|sod-utilities| package.
 \begin{describe}{mac}{asetf @{ @<place> @<value> @}^*}
 \end{describe}
 
+
+\subsection{Metaobject protocol utilities}
+
 \begin{describe}{gf}{instance-initargs @<instance>}
 \end{describe}
 
@@ -110,6 +128,23 @@ These symbols are defined in the @|sod-utilities| package.
      \dhead{gf}{eql-specializer-object @<specializer> @> @<value>}}
 \end{describe*}
 
+
+\subsection{Other CLOS utilities}
+
+\begin{describe}{mac}
+    {default-slot (@<instance> @<slot> @[@<slot-names>@])       \\ \ind
+      @<form>^*}
+\end{describe}
+
+\begin{describe}{mac}
+    {define-on-demand-slot @<class> @<slot> (@<instance>)       \\ \ind
+      @[[ @<declaration>^* @! @<doc-string> @]]                 \\
+      @<form>^*}
+\end{describe}
+
+
+\subsection{Building lists}
+
 \begin{describe}{fun}{make-list-builder \&optional @<initial> @> @<builder>}
 \end{describe}
 
@@ -122,36 +157,58 @@ These symbols are defined in the @|sod-utilities| package.
 \begin{describe}{fun}{lbuild-list @<builder> @> @<list>}
 \end{describe}
 
-\begin{describe}{fun}
-    {mappend @<function> @<list> \&rest @<more-lists> @> @<result-list>}
-\end{describe}
 
-\begin{describe}{cls}{inconsistent-merge-error (error) \&key :candidates}
+\subsection{Merging lists}
+
+\begin{describe}{cls}
+    {inconsistent-merge-error (error) \&key :candidates :present}
 \end{describe}
 
 \begin{describe}{gf}{merge-error-candidates @<error> @> @<list>}
 \end{describe}
 
+\begin{describe}{gf}{merge-error-present-function @<error> @> @<function>}
+\end{describe}
+
 \begin{describe}{fun}
-    {merge-lists @<lists> \&key :pick (:test \#'eql) @> @<list>}
+    {merge-lists @<lists> \&key :pick (:test \#'eql) :present @> @<list>}
+\end{describe}
+
+
+\subsection{Other list utilities}
+
+\begin{describe}{fun}
+    {mappend @<function> @<list> \&rest @<more-lists> @> @<result-list>}
+\end{describe}
+
+\begin{describe}{fun}
+    {distinguished-point-shortest-paths @<root> @<neighbours-func>
+      @> @<list>}
 \end{describe}
 
 \begin{describe}{mac}
     {categorize (\=@<item-var> @<items>
-                   @[[ :bind (@{ @<var> @! (@<var> @[@<value>@]) @}^*) @]])
-                                                                 \\ \ind\ind
-        (@{ (@<cat-var> @<cat-predicate>) @}^*) \- \\
-      @<declaration>^* \\
-      @<body-form>^* \-
-     \nlret @<value>^*}
+                   @[[ :bind (@{ @<var> @!
+                                 (@<var> @[@<value>@]) @}^*) @]])
+                                                                \\ \ind\ind
+        (@{ (@<cat-var> @<cat-predicate>) @}^*)               \-\\
+      @<declaration>^*                                          \\
+      @<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>}
+    {find-duplicates @<report> @<sequence> \&key :identity :test}
 \end{describe}
 
-\begin{describe}{fun}{whitespace-char-p @<character> @> @<generic-function>}
+
+\subsection{Position tracking}
+
+\begin{describe}{fun}
+    {whitespace-char-p @<character> @> @<generalized-boolean>}
 \end{describe}
 
 \begin{describe}{fun}
@@ -164,29 +221,60 @@ These symbols are defined in the @|sod-utilities| package.
       @> @<old-line> @<old-column>}
 \end{describe}
 
-\begin{describe}{fun}
-    {compose @<function> \&rest @<more-functions> @> @<function>}
-\end{describe}
 
-\begin{describe}{fun}{symbolicate \&rest @<symbols> @> @<symbol>}
-\end{describe}
+\subsection{Object printing}
 
 \begin{describe}{mac}
-    {maybe-print-unreadable-object (@<object> @<stream>
-                                    @[[ :type @<type> @!
-                                        :identity @<identity> @]]) \\ \ind
-      @<declaration>^* \\
+    {maybe-print-unreadable-object
+        (@<object> @<stream>
+         @[[ :type @<type> @!
+             :identity @<identity> @]])                         \\ \ind
+      @<declaration>^*                                          \\
       @<form>^*}
 \end{describe}
 
 \begin{describe}{fun}{print-ugly-stuff @<stream> @<func> @> @<value>^*}
 \end{describe}
 
+
+\subsection{Condition utilities}
+
+\begin{describe}{cls}
+    {simple-control-error (control-error simple-error)
+        \&key :format-control :format-arguments}
+\end{describe}
+
+\begin{describe}{fun}
+    {designated-condition
+        \=@<default-type> @<datum> @<arguments>                 \\
+        \>\&key :allow-pointless-arguments
+      \nlret @<condition>}
+\end{describe}
+
+\begin{describe}{fun}
+    {invoke-associated-restart @<restart> @<condition> \&rest @<arguments>}
+\end{describe}
+
+
+\subsection{Very miscellaneous utilities}
+
+\begin{describe}{fun}
+    {frob-identifier @<string> \&key :swap-case :swap-hyphen
+      @> @<frobbed-string>}
+\end{describe}
+
+\begin{describe}{fun}
+    {compose @<function> \&rest @<more-functions> @> @<function>}
+\end{describe}
+
+\begin{describe}{mac}{defvar-unbound @<name> @<documentation> @> @<name>}
+\end{describe}
+
 \begin{describe}{mac}
     {dosequence (@<var> @<sequence>
                  @[[ :start @<start> @! :end @<end> @!
-                     :indexvar @<var> @]]) \\ \ind
-      @<declaration>^* \\
+                     :indexvar @<var> @]])                      \\ \ind
+      @<declaration>^*                                          \\
       @{ @<tag> @! @<statement> @}^*}
 \end{describe}
 
@@ -195,17 +283,6 @@ These symbols are defined in the @|sod-utilities| package.
                            @[[ :read-only @<read-only-flag> @]]}
 \end{describe}
 
-\begin{describe}{mac}
-    {default-slot (@<instance> @<slot> @[@<slot-names>@]) \\ \ind
-      @<form>^*}
-\end{describe}
-
-\begin{describe}{mac}
-    {define-on-demand-slot @<class> @<slot> (@<instance>) \\ \ind
-      @[[ @<declaration>^* @! @<doc-string> @]] \\
-      @<form>^*}
-\end{describe}
-
 %%%--------------------------------------------------------------------------
 \section{Condition utilities} \label{sec:misc.condition}
 
@@ -218,13 +295,29 @@ These symbols are defined in the @|sod-parser| package.
     {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*}
+    {\dhead{rst}{noted}
+     \dhead{fun}{noted \&optional @<condition>}}
+\end{describe*}
+
 \begin{describe}{fun}{cerror* @<datum> \&rest @<arguments>}
 \end{describe}
 
 %%%--------------------------------------------------------------------------
 \section{Option parser} \label{sec:misc.optparse}
 
-These symbols are defined in the @!optparse| package.
+These symbols are defined in the @|optparse| package.
 
 \begin{describe}{fun}{exit \&optional (@<code> 0) \&key :abrupt}
 \end{describe}
@@ -254,9 +347,10 @@ These symbols are defined in the @!optparse| package.
 \end{describe}
 
 \begin{describe}{fun}
-    {make-option \=@<long-name> @<short-name> \+ \\
-                   \&optional @<arg-name> \\
-                   \&key :tag :negated-tag :arg-optional-p :documentation \-
+    {make-option \=@<long-name> @<short-name>                 \+\\
+                   \&optional @<arg-name>                       \\
+                   \&key :tag :negated-tag
+                         :arg-optional-p :documentation       \-
       \nlret @<option>}
 \end{describe}
 
@@ -455,9 +549,6 @@ These symbols are defined in the @!optparse| package.
      \dhead{fun}{setf (p-seenp @<property>) @<boolean>}}
 \end{describe*}
 
-\begin{describe}{gf}{decode-property @<raw-value> @> @<type> @<value>}
-\end{describe}
-
 \begin{describe}{gf}
     {coerce-property-value @<value> @<type> @<wanted> @> @<coerced-value>}
 \end{describe}
@@ -517,12 +608,17 @@ These symbols are defined in the @!optparse| package.
 \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>}
 \end{describe}
 
 %%%--------------------------------------------------------------------------
-\section{Miscellaneous translator features} \label{sec:misc.pset}
+\section{Miscellaneous translator features} \label{sec:misc.misc}
 
 \begin{describe}{var}{*sod-version*}
 \end{describe}
@@ -530,12 +626,23 @@ These symbols are defined in the @!optparse| package.
 \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}
+    {test-parse-c-type @<string>
+      @> t @<c-type> @<kernel> @<string> @! nil @<indicator>}
+\end{describe}
+
+\begin{describe}{fun}
+    {test-parse-pset @<string>
+      @> t @<pset> @! nil @<indicator>}
 \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}