doc/list-exports.lisp: Categorize `setf'-functions as generic or plain.

diff --git a/doc/SYMBOLS b/doc/SYMBOLS
index 5de9929..7b801b2 100644 (file)
--- a/doc/SYMBOLS
+++ b/doc/SYMBOLS
@@ -7,7 +7,7 @@ builtin.lisp
 
 c-types-class-impl.lisp
   c-class-type                                  class
-  c-type-class                                  generic setf
+  c-type-class                                  generic setf-generic
   cl:class                                      class c-type
   find-class-type                               function
   find-sod-class                                function
@@ -61,7 +61,7 @@ c-types-impl.lisp
   c-type-void                                   variable
   c-type-wchar-t                                variable
   c-union-type                                  class
-  cl:char                                       function setf c-type parser
+  cl:char                                       function setf-function c-type parser
   commentify-argument-names                     function
   commentify-function-type                      function
   const-string                                  c-type
@@ -106,7 +106,7 @@ c-types-impl.lisp
   ptr                                           c-type
   ptrdiff-t                                     c-type
   reify-variable-argument-tail                  function
-  cl:schar                                      function setf c-type
+  cl:schar                                      function setf-function c-type
   short                                         c-type
   short-int                                     c-type
   signed                                        c-type
@@ -331,21 +331,21 @@ classes.lisp
   sod-class-chain-head                          generic
   sod-class-chain-link                          generic
   sod-class-chains                              generic
-  sod-class-class-initializers                  generic setf
+  sod-class-class-initializers                  generic setf-generic
   sod-class-direct-superclasses                 generic
   sod-class-ilayout                             generic
-  sod-class-initfrags                           generic setf
+  sod-class-initfrags                           generic setf-generic
   sod-class-initializer                         class
-  sod-class-instance-initializers               generic setf
-  sod-class-messages                            generic setf
+  sod-class-instance-initializers               generic setf-generic
+  sod-class-messages                            generic setf-generic
   sod-class-metaclass                           generic
-  sod-class-methods                             generic setf
+  sod-class-methods                             generic setf-generic
   sod-class-name                                generic
   sod-class-nickname                            generic
   sod-class-precedence-list                     generic
-  sod-class-slots                               generic setf
+  sod-class-slots                               generic setf-generic
   sod-class-state                               generic
-  sod-class-tearfrags                           generic setf
+  sod-class-tearfrags                           generic setf-generic
   sod-class-type                                generic
   sod-class-vtables                             generic
   sod-initarg                                   class
@@ -386,7 +386,7 @@ codegen-proto.lisp
   call-inst                                     class
   codegen-add-function                          generic
   codegen-build-function                        function
-  codegen-functions                             generic setf
+  codegen-functions                             generic setf-generic
   codegen-pop                                   generic
   codegen-pop-block                             generic
   codegen-pop-function                          generic
@@ -452,7 +452,7 @@ codegen-proto.lisp
   temporary-name                                class
   temporary-var                                 generic
   update-inst                                   class
-  var-in-use-p                                  generic setf
+  var-in-use-p                                  generic setf-generic
   var-inst                                      class
   while-inst                                    class
   with-temporary-var                            macro
@@ -590,10 +590,10 @@ module-proto.lisp
   define-module-var                             macro
   finalize-module                               generic
   module                                        class
-  module-dependencies                           generic setf
+  module-dependencies                           generic setf-generic
   module-errors                                 generic
   module-import                                 generic
-  module-items                                  generic setf
+  module-items                                  generic setf-generic
   module-name                                   generic
   module-pset                                   generic
   with-module-environment                       macro
@@ -608,9 +608,9 @@ output-proto.lisp
   make-sequencer-item                           function
   sequence-output                               macro
   sequencer                                     class
-  sequencer-constraints                         generic setf
+  sequencer-constraints                         generic setf-generic
   sequencer-item                                class
-  sequencer-item-functions                      function setf
+  sequencer-item-functions                      function setf-function
   sequencer-item-name                           function
   sequencer-item-p                              function
   sequencer-table                               generic
@@ -631,7 +631,7 @@ pset-proto.lisp
   make-pset                                     function
   p-key                                         function
   p-name                                        function
-  p-seenp                                       function setf
+  p-seenp                                       function setf-function
   p-type                                        function
   p-value                                       function
   property                                      class
@@ -1689,7 +1689,7 @@ parser-proto.lisp
   ?                                             parser
   cl:and                                        macro parser
   call-pluggable-parser                         function
-  cl:char                                       function setf c-type parser
+  cl:char                                       function setf-function c-type parser
   character-parser-context                      class
   combine-parser-failures                       function
   commit                                        parser
@@ -1756,12 +1756,12 @@ scanner-proto.lisp
   parser-scanner                                generic
   scanner-at-eof-p                              generic
   scanner-capture-place                         generic
-  scanner-column                                generic setf
+  scanner-column                                generic setf-generic
   scanner-context                               class
   scanner-current-char                          generic
   scanner-filename                              generic
   scanner-interval                              generic
-  scanner-line                                  generic setf
+  scanner-line                                  generic setf-generic
   scanner-release-place                         generic
   scanner-restore-place                         generic
   scanner-step                                  generic
@@ -1779,8 +1779,8 @@ streams-proto.lisp
   position-aware-input-stream                   class
   position-aware-output-stream                  class
   position-aware-stream                         class
-  position-aware-stream-column                  generic setf
-  position-aware-stream-line                    generic setf
+  position-aware-stream-column                  generic setf-generic
+  position-aware-stream-line                    generic setf-generic
   stream-line-and-column                        generic
   stream-pathname                               generic
 
@@ -2229,19 +2229,19 @@ optparse.lisp
   make-option                                   function
   make-option-parser                            function
   moan                                          function
-  op-long-only-p                                function setf
-  op-negated-numeric-p                          function setf
-  op-negated-p                                  function setf
-  op-non-option                                 function setf
-  op-numeric-p                                  function setf
-  op-options                                    function setf
-  opt-arg-name                                  function setf
-  opt-arg-optional-p                            function setf
-  opt-documentation                             function setf
-  opt-long-name                                 function setf
-  opt-negated-tag                               function setf
-  opt-short-name                                function setf
-  opt-tag                                       function setf
+  op-long-only-p                                function setf-function
+  op-negated-numeric-p                          function setf-function
+  op-negated-p                                  function setf-function
+  op-non-option                                 function setf-function
+  op-numeric-p                                  function setf-function
+  op-options                                    function setf-function
+  opt-arg-name                                  function setf-function
+  opt-arg-optional-p                            function setf-function
+  opt-documentation                             function setf-function
+  opt-long-name                                 function setf-function
+  opt-negated-tag                               function setf-function
+  opt-short-name                                function setf-function
+  opt-tag                                       function setf-function
   option                                        class
   option-parse-error                            function class
   option-parse-next                             function
@@ -2312,7 +2312,7 @@ utilities.lisp
   sb-mop:eql-specializer-object                 generic
   find-duplicates                               function
   frob-identifier                               function
-  sb-mop:generic-function-methods               generic setf
+  sb-mop:generic-function-methods               generic setf-generic
   inconsistent-merge-error                      class
   info                                          function
   information                                   class
@@ -2339,7 +2339,7 @@ utilities.lisp
   partial-order-minima                          function
   print-ugly-stuff                              function
   promiscuous-cerror                            function
-  ref                                           function setf
+  ref                                           function setf-function
   simple-control-error                          class
   simple-information                            class
   symbolicate                                   function

diff --git a/doc/list-exports.lisp b/doc/list-exports.lisp
index c86156b..f4117df 100755 (executable)
--- a/doc/list-exports.lisp
+++ b/doc/list-exports.lisp
@@ -162,9 +162,10 @@
                   :generic)
                  (t :function))
            things)
-      (when (or ;;(not (boring-setf-expansion-p symbol))
-               (ignore-errors (fdefinition (list 'setf symbol))))
-       (push :setf things)))
+      (etypecase (ignore-errors (fdefinition (list 'setf symbol)))
+       (generic-function (push :setf-generic things))
+       (function (push :setf-function things))
+       (null)))
     (when (find-class symbol nil)
       (push :class things))
     (when (or (specialized-on-p #'sod:expand-c-type-spec 0 symbol)