Browse Source

packages: Prevent inlining of 'find-best-packages-by-name'.

This allows 'tests/packages.scm' to mock it.

* gnu/packages.scm (find-best-packages-by-name): Set! it at the top
level to prevent it from being inline on Guile 3.
gn-latest-20200428
Ludovic Courtès 2 years ago
parent
commit
886a76073e
No known key found for this signature in database GPG Key ID: 90B11993D9AEBB5
  1. 3
      gnu/packages.scm

3
gnu/packages.scm

@ -369,6 +369,9 @@ VERSION."
(string=? (package-version p) highest))
matches))))))
;; Prevent Guile 3 from inlining this procedure so we can mock it in tests.
(set! find-best-packages-by-name find-best-packages-by-name)
(define (generate-package-cache directory)
"Generate under DIRECTORY a cache of all the available packages.

Loading…
Cancel
Save