(and (>= *delivery-level* 3)
(not (member (delivery-value :keep-clos)
'(t
:full-dynamic-definition
:method-dynamic-definition))))
If this is non-
nil
, generic functions with single methods and simple arguments are collapsed -- that is, replaced by ordinary functions.
Note: Methods cannot be added to collapsed generic functions, since after their collapse to ordinary functions the generic functions definitions are deleted.
A formatted report detailing the actions performed during the collapse is output to the file specified by :gf-collapse-output-file. The default is
"gfclps.txt"
.