mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 13:10:33 +02:00
utils: Remove 'split'.
This procedure was redundant with SRFI-1's 'break'.
* guix/utils.scm (split): Remove.
* tests/utils.scm ("split, element is in list")
("split, element is not in list"): Remove.
This commit is contained in:
@@ -122,20 +122,6 @@
|
||||
'(0 1 2 3)))
|
||||
list))
|
||||
|
||||
(test-equal "split, element is in list"
|
||||
'((foo) (baz))
|
||||
(call-with-values
|
||||
(lambda ()
|
||||
(split '(foo bar baz) 'bar))
|
||||
list))
|
||||
|
||||
(test-equal "split, element is not in list"
|
||||
'((foo bar baz) ())
|
||||
(call-with-values
|
||||
(lambda ()
|
||||
(split '(foo bar baz) 'quux))
|
||||
list))
|
||||
|
||||
(test-equal "strip-keyword-arguments"
|
||||
'(a #:b b #:c c)
|
||||
(strip-keyword-arguments '(#:foo #:bar #:baz)
|
||||
|
||||
Reference in New Issue
Block a user