A simple workaround for sbcl clsql-based cores deployment. Solving libraries paths problem by unloading/loading libraries.

build-core.lisp

(let ((library-list (cffi:list-foreign-libraries)))

  (setf cffi:*foreign-library-directories* (list #p"lib/"))
  (setf clsql-sys:*foreign-library-search-paths* (list #p"lib/"))
  #+sbcl 
  (progn
    (pushnew (alexandria:named-lambda load-libraries ()
               (mapcar #'(lambda (x) 
                           (cffi:load-foreign-library x))
                       (mapcar #'(lambda (x)
                                   (pathname (file-namestring (slot-value x 'pathname))))
                               library-list))) 
             sb-ext:*init-hooks*)
    
    (mapcar #'cffi:close-foreign-library library-list))
  
  (save-lisp-and-die "image.core" :purify t :executable t))