Browse Source

guix: git: Stop using libgit2-shutdown.

* guix/git.scm (with-libgit2): Stop calling (libgit2-shutdown) to prevent
segfaults when pointer finalizers are run.
wip-gexp-hygiene
Mathieu Othacehe 5 years ago
parent
commit
b02469d298
No known key found for this signature in database GPG Key ID: 8354763531769CA6
  1. 13
      guix/git.scm

13
guix/git.scm

@ -34,13 +34,12 @@
(make-parameter "/var/cache/guix/checkouts"))
(define-syntax-rule (with-libgit2 thunk ...)
(dynamic-wind
(lambda ()
(libgit2-init!))
(lambda ()
thunk ...)
(lambda ()
(libgit2-shutdown))))
(begin
;; XXX: The right thing to do would be to call (libgit2-shutdown) here,
;; but pointer finalizers used in guile-git may be called after shutdown,
;; resulting in a segfault. Hence, let's skip shutdown call for now.
(libgit2-init!)
thunk ...))
(define* (url-cache-directory url
#:optional (cache-directory

Loading…
Cancel
Save