tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 13:10:33 +02:00
Code Activity

Merge branch 'core-updates'

Browse Source
This commit is contained in:
Ludovic Courtès
2013-04-30 17:06:00 +02:00
parent e0fbbc889d 01155b1808
commit 0734a9a813
48 changed files with 6153 additions and 269 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
tests/utils.scm
View File

@@ -66,6 +66,16 @@
("nixpkgs" "1.0pre22125_a28fe19")
("gtk2" "2.38.0"))))
(test-equal "string-tokenize*"
'(("foo")
("foo" "bar" "baz")
("foo" "bar" "")
("foo" "bar" "baz"))
(list (string-tokenize* "foo" ":")
(string-tokenize* "foo;bar;baz" ";")
(string-tokenize* "foo!bar!" "!")
(string-tokenize* "foo+-+bar+-+baz" "+-+")))
(test-equal "fold2, 1 list"
(list (reverse (iota 5))
(map - (reverse (iota 5))))