Loading

guix-guile-fibers.scm

  1. (define-public guile3.0-fibers
  2.   (let ((commit "1683068f61986d3ddb4d0b845a3ed781dc115e9c"))
  3.     (package
  4.      (inherit guile-fibers)
  5.      (name "guile3.0-fibers")
  6.      (version "1.0.0-0")
  7.      (source (origin
  8.               (method git-fetch)
  9.               (uri (git-reference
  10.                     (url "https://github.com/wingo/fibers/")
  11.                     (commit commit)))
  12.               (file-name (string-append name "-" version "-checkout"))
  13.               (sha256
  14.                (base32
  15.                 ""))))
  16.      (arguments
  17.       '(#:phases (modify-phases %standard-phases
  18.                    (add-after 'install 'mode-guile-objects
  19.                      (lambda* (#:key outputs #:allow-other-keys)
  20.                        ;; .go files are installed to "lib/guile/X.Y/cache".
  21.                        ;; This phase moves them to "…/site-ccache".
  22.                        (let* ((out (assoc-ref outputs "out"))
  23.                               (lib (string-append out "/lib/guile"))
  24.                               (old (car (find-files lib "^ccache$"
  25.                                                     #:directories? #t)))
  26.                               (new (string-append (dirname old)
  27.                                                   "/site-ccache")))
  28.                          (rename-file old new)
  29.                          #t))))))
  30.     (native-inputs
  31.      `(("texinfo" ,texinfo)
  32.        ("automake" ,automake)
  33.        ("autoconf" ,autoconf)
  34.        ("gettext" ,gettext-minimal)
  35.        ("guile" ,guile-next)
  36.        ("libtool" ,libtool)
  37.        ("pkg-config" ,pkg-config))))))