Patch is applied in 1f100a4f20c3a6e57922fb26fce212997e2a03cb, thanks.
However I cannot build Guile on macos at the moment bc of an error in
lib/basename-lgpl.h, this seems caused by the last gnulib update :-\
> On 2 Sep 2021, at 07:38, Aleix Conchillo Flaqué <aconchi...@gmail.com> wrote:
>
> Without this change dynamic libraries in macOS are not loaded
> properly. This has happened since 3.0.6.
>
> scheme@(guile-user)> %host-type
> $1 = "x86_64-apple-darwin20.5.0"
>
> --------------------------------
>
> scheme@(guile-user)> (use-modules (git))
> While compiling expression:
> In procedure git_libgit2_init: Function not implemented
>
> --------------------------------
>
> scheme@(guile-user)> (use-modules (system foreign))
> scheme@(guile-user)> (dynamic-link "/usr/local/lib/libgit2")
> ice-9/boot-9.scm:1685:16: In procedure raise-exception:
> In procedure load-foreign-library: file: "/usr/local/lib/libgit2",
> message: "file not found"
>
> Entering a new prompt. Type `,bt' for a backtrace or `,q' to continue.
> scheme@(guile-user) [1]>
>
> --------------------------------
>
> After this fix:
>
> scheme@(guile-user)> (use-modules (system foreign))
> scheme@(guile-user)> (dynamic-link "/usr/local/lib/libgit2")
> $2 = #<<foreign-library> filename: "/usr/local/lib/libgit2" handle:
> #<pointer 0x7ffed3104ac0>>
>
> On Wed, Sep 1, 2021 at 10:28 PM Aleix Conchillo Flaqué
> <aconchi...@gmail.com> wrote:
>>
>> * module/system/foreign-library.scm (system-library-extensions): fix
>> darwin host detection. darwin host types have "-darwin" but not
>> "-darwin-".
>> ---
>> module/system/foreign-library.scm | 2 +-
>> 1 file changed, 1 insertion(+), 1 deletion(-)
>>
>> diff --git a/module/system/foreign-library.scm
>> b/module/system/foreign-library.scm
>> index d53e293ef..dc426385f 100644
>> --- a/module/system/foreign-library.scm
>> +++ b/module/system/foreign-library.scm
>> @@ -48,7 +48,7 @@
>>
>> (define system-library-extensions
>> (cond
>> - ((string-contains %host-type "-darwin-")
>> + ((string-contains %host-type "-darwin")
>> '(".bundle" ".so" ".dylib"))
>> ((or (string-contains %host-type "cygwin")
>> (string-contains %host-type "mingw")
>> --
>> 2.33.0
>>
>
