From mboxrd@z Thu Jan  1 00:00:00 1970
From: Pierre Neidhardt <mail@ambrevar.xyz>
Subject: bug#39079: SBCL CFFI from Guix unable to find dynamic libraries
Date: Sat, 11 Jan 2020 10:58:07 +0100
Message-ID: <877e1ywc0g.fsf@ambrevar.xyz>
References: <87ftgm3bo4.fsf@gmail.com>
Mime-Version: 1.0
Content-Type: multipart/signed; boundary="=-=-=";
 micalg=pgp-sha256; protocol="application/pgp-signature"
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane-mx.org@gnu.org>
Received: from eggs.gnu.org ([2001:470:142:3::10]:46302)
 by lists.gnu.org with esmtp (Exim 4.90_1)
 (envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1iqDXr-0005nK-6g
 for bug-guix@gnu.org; Sat, 11 Jan 2020 04:59:04 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1iqDXq-0006fR-43
 for bug-guix@gnu.org; Sat, 11 Jan 2020 04:59:03 -0500
Received: from debbugs.gnu.org ([209.51.188.43]:49409)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
 id 1iqDXp-0006ea-W2
 for bug-guix@gnu.org; Sat, 11 Jan 2020 04:59:02 -0500
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
 (envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1iqDXp-0006Uk-Vp
 for bug-guix@gnu.org; Sat, 11 Jan 2020 04:59:01 -0500
In-Reply-To: <87ftgm3bo4.fsf@gmail.com>
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.39079.B39079.157873669324912@debbugs.gnu.org>
List-Id: Bug reports for GNU Guix <bug-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-guix>,
 <mailto:bug-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <https://lists.gnu.org/archive/html/bug-guix>
List-Post: <mailto:bug-guix@gnu.org>
List-Help: <mailto:bug-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-guix>,
 <mailto:bug-guix-request@gnu.org?subject=subscribe>
Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane-mx.org@gnu.org
Sender: "bug-Guix" <bug-guix-bounces+gcggb-bug-guix=m.gmane-mx.org@gnu.org>
To: 39079@debbugs.gnu.org

--=-=-=
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

Hi Evan,

This is a current limitation on Guix because CFFI hardcodes the lib path
to /usr/lib, etc.
Maybe we could fix this, but it's not very clear how.

In the meantime, you can add this to your ~/.sbclrc:

=2D-8<---------------cut here---------------start------------->8---
(when (ignore-errors (asdf:load-system "cffi"))
  ;; Warning: Trailing "/" matters!
  (dolist (guix-profile
           `(,(when (uiop:directory-exists-p "~/.guix-profile")
                (format nil "~a/.guix-profile/lib/" (uiop:getenv "HOME")))
              ,@(mapcar (lambda (d)
                          (format nil "~a~a/lib/"
                                  (namestring d)
                                  (first (last (pathname-directory d)))))
                        (uiop:subdirectories "~/.guix-extra-profiles/"))))
    (push guix-profile
          (symbol-value (find-symbol (string '*foreign-library-directories*)
                                     (find-package 'cffi))))))
=2D-8<---------------cut here---------------end--------------->8---

In the above, edit "~/.guix-extra-profiles" to point to the directory
where you store all your profiles.

Hope that helps!

=2D-=20
Pierre Neidhardt
https://ambrevar.xyz/

--=-=-=
Content-Type: application/pgp-signature; name="signature.asc"

-----BEGIN PGP SIGNATURE-----

iQEzBAEBCAAdFiEEUPM+LlsMPZAEJKvom9z0l6S7zH8FAl4ZnC8ACgkQm9z0l6S7
zH8ewAf6AwU0b2bmnlVUCiosS8A8mTQbGzuBgPpdaN2aTgAk8foi6l6Ee/S6JUYG
sK9Qfmw/lj/qs3QvwuA317Zog0U+bG5NPucuKwGGvZ0f/DkK6dF3wwL6Tjwt+cAl
mnVVWKnOlXAhonKRBEJorvROGEuA6y3YjDWXTIt1rR2YGNdlyJzqTZE7H4oO8Yyl
byY3/cZrN4kcW1XlBOY4SfIrE//rrJxL9/5VIYvR1tXmpV89IjggsSRohQVV+0Ys
OfAJ/ru9c0GOT4EvKyXeAP/3HzXOEkIxo8yoRATqkDcQVfT3C9VSGhenOfLt0Y7q
cUV0ViE3OGGGEzd5Z79snB/iQtShpA==
=SyQ5
-----END PGP SIGNATURE-----
--=-=-=--