* swank-sbcl.lisp (wrap): Adapt to newer SBCL.