fix: correct implementation of predicate any? on (guix combinators)
parent
5665d3f3cd
commit
992d9d36c4
|
@ -8,7 +8,7 @@
|
|||
inclusive-disjoin))
|
||||
|
||||
(define (all? pred lst)
|
||||
(null? (filter null? (map pred lst))))
|
||||
(null? (filter (negate pred) lst)))
|
||||
|
||||
(define (any? pred lst)
|
||||
(cond ((null? lst) #f)
|
||||
|
|
Loading…
Reference in New Issue