summaryrefslogtreecommitdiff
path: root/guix/build/gnu-build-system.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/build/gnu-build-system.scm')
-rw-r--r--guix/build/gnu-build-system.scm12
1 files changed, 0 insertions, 12 deletions
diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm
index 0a774e1e84..75439c8330 100644
--- a/guix/build/gnu-build-system.scm
+++ b/guix/build/gnu-build-system.scm
@@ -409,18 +409,6 @@ makefiles."
strip-directories)))
outputs))))
-(define (every* pred lst)
- "This is like 'every', but process all the elements of LST instead of
-stopping as soon as PRED returns false. This is useful when PRED has side
-effects, such as displaying warnings or error messages."
- (let loop ((lst lst)
- (result #t))
- (match lst
- (()
- result)
- ((head . tail)
- (loop tail (and (pred head) result))))))
-
(define* (validate-runpath #:key
(validate-runpath? #t)
(elf-directories '("lib" "lib64" "libexec"