X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/87883222727894b13d3d4ce50e413a544a50fe20..3ee33e04477ace9d13587f28253fb8c6d1c7ed6c:/doc/meta.tex?ds=sidebyside

diff --git a/doc/meta.tex b/doc/meta.tex
index 05a6fc0..4b42a86 100644
--- a/doc/meta.tex
+++ b/doc/meta.tex
@@ -62,7 +62,7 @@
 \end{describe*}
 
 \begin{describe}{fun}
-    {make-sod-class @<name> @<superclasses> @<pset> \&optional @<floc>
+    {make-sod-class @<name> @<superclasses> @<pset> \&key :location
       @> @<class>}
 \end{describe}
 
@@ -125,7 +125,7 @@
 \end{describe*}
 
 \begin{describe}{gf}
-    {make-sod-slot @<class> @<name> @<type> @<pset> \&optional @<floc>
+    {make-sod-slot @<class> @<name> @<type> @<pset> \&key :location
       @> @<slot>}
 \end{describe}
 
@@ -165,18 +165,19 @@
 
 \begin{describe*}
     {\dhead{gf}
-      {make-slot-instance-initializer
-          \=@<class> @<nick> @<name> @<value> @<pset> \&optional @<floc>
+      {make-sod-instance-initializer
+          \=@<class> @<nick> @<name> @<value> @<pset> \\
+          \>\&key :inhibit-initargs :location
         \nlret @<init>}
      \dhead{gf}
-      {make-slot-class-initializer
-          \=@<class> @<nick> @<name> @<value> @<pset> \&optional @<floc>
+      {make-sod-class-initializer
+          \=@<class> @<nick> @<name> @<value> @<pset> \&key :location
         \nlret @<init>}}
 \end{describe*}
 
 \begin{describe}{gf}
     {make-sod-initializer-using-slot
-        \=@<class> @<slot> @<init-class> @<value> @<pset> \&optional @<floc>
+        @<class> @<slot> @<init-class> @<value> @<pset> @<floc>
       \nlret @<init>}
 \end{describe}
 
@@ -196,7 +197,7 @@
 
 \begin{describe}{gf}
      {make-sod-user-initarg @<class> @<name> @<type> @<pset>
-                            \&optional @<default> @<floc>}
+                            \&key :default :location}
 \end{describe}
 
 \begin{describe}{gf}{sod-initarg-default @<initarg> @> @<default>}
@@ -212,19 +213,19 @@
 
 \begin{describe}{gf}
     {make-sod-slot-initarg @<class> @<name> @<nick> @<slot-name> @<pset>
-                           \&optional @<floc>}
+                           \&key :location}
 \end{describe}
 
 \begin{describe}{gf}
     {make-sod-slot-initarg-using-slot @<class> @<name> @<slot> @<pset>
-                                      \&optional @<floc>}
+                                      \&key :location}
 \end{describe}
 
 \begin{describe*}
     {\dhead{gf}{make-sod-class-initfrag @<class> @<frag> @<pset>
-                                        \&optional @<floc>}
+                                        \&key :location}
      \dhead{gf}{make-sod-class-tearfrag @<class> @<frag> @<pset>
-                                        \&optional @<floc>}}
+                                        \&key :location}}
 \end{describe*}
 
 \begin{describe}{cls}{sod-message () \&key :name :location :class :type}
@@ -237,7 +238,7 @@
 \end{describe*}
 
 \begin{describe}{gf}
-    {make-sod-message @<class> @<name> @<type> @<pset> \&optional @<floc>
+    {make-sod-message @<class> @<name> @<type> @<pset> \&key :location
       @> @<message>}
 \end{describe}
 
@@ -263,7 +264,7 @@
 \begin{describe}{gf}
     {make-sod-method
         \=@<class> @<nick> @<name> @<type> @<body>            \+\\
-          @<pset> \&optional @<floc>                          \-
+          @<pset> \&key :location                             \-
       \nlret @<method>}
 \end{describe}
 
@@ -271,7 +272,7 @@
     {make-sod-method-using-message
         \=@<message> @<class>
           @<type> @<body>                                     \+\\
-          @<pset> \&optional @<floc>                          \-
+          @<pset> \&key :location                             \-
       \nlret @<method>}
 \end{describe}
 
