On newish Darwin it works, but some people still run old enough
version that it won't work. As long as we're not explicitly checking
for "Darwin new enough?", let's try not to break...
Fixes lp#957385
(dlerror)
(let (dlerror)
(cond ((and (not objp) *runtime-dlhandle*)
(dlerror)
(let (dlerror)
(cond ((and (not objp) *runtime-dlhandle*)
- ;; CLH: if we're on darwin/ppc we can't close
+ ;; CLH/NS: if we're on sufficiently old darwin we can't close
;; *runtime-dlhandle* for some reason, so don't.
;; *runtime-dlhandle* for some reason, so don't.
(dlclose *runtime-dlhandle*)
(setf dlerror (dlerror)
*runtime-dlhandle* nil))
(dlclose *runtime-dlhandle*)
(setf dlerror (dlerror)
*runtime-dlhandle* nil))