anchor.diff:  ;;; function we need is at the end of the encapsulation chain.
   (defun maybe-find-encapsulated-function (function)
     (declare (type function function))
  -  (if (eq (swank-backend:function-name function) 'sb-impl::encapsulation)
  +  (if (eq (sb-impl::%fun-name function) 'sb-impl::encapsulation)
         (maybe-find-encapsulated-function
          (sb-impl::encapsulation-info-definition
           (sb-impl::encapsulation-info function)))
  
positive.code:             (second lambda-expression)
              (excl:arglist symbol)))
      (simple-error () :not-available))
    #-allegro
    (swank-backend:arglist function-designator))
  
  
negative.code: (defmethod make-stream-spec ((spec (eql t)) &rest args)
    (assert (endp args))
    *standard-output*)
  
  
  