Method: (STARTUP-BACKEND BEFORE HTTPD-BACKEND)

Source

(defmethod startup-backend :before ((backend httpd-backend) &rest initargs)
  (declare (ignore initargs))
  (setf (socket backend) (swank-backend:create-socket (host backend) (port backend))))