with-defun-emission: restore that which was once lost..
emit-binding-form-body: make compatible with alexandria:parse-body