diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-11-08 21:58:09 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-11-08 21:58:09 +0100 |
| commit | 7db9608d52ab431165ab150a0a0707c686990c1c (patch) | |
| tree | b19d49a71e71f8da939a4825b545da3a31907e65 /tests/ui.scm | |
| parent | 7a78cc7af24a1303dd0117cb977e15ca89a5dad8 (diff) | |
| parent | 6a9957545ce51e7a50381059d4509d0dfcba0aba (diff) | |
| download | guix-patches-7db9608d52ab431165ab150a0a0707c686990c1c.tar guix-patches-7db9608d52ab431165ab150a0a0707c686990c1c.tar.gz | |
Merge branch 'master' into core-updates
Conflicts:
guix/packages.scm
Diffstat (limited to 'tests/ui.scm')
| -rw-r--r-- | tests/ui.scm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/tests/ui.scm b/tests/ui.scm index 3d5c3e7969..08ee3967a8 100644 --- a/tests/ui.scm +++ b/tests/ui.scm @@ -65,6 +65,23 @@ interface, and powerful string processing.") 10) #\newline)) +(test-equal "package-specification->name+version+output" + '(("guile" #f "out") + ("guile" "2.0.9" "out") + ("guile" #f "debug") + ("guile" "2.0.9" "debug") + ("guile-cairo" "1.4.1" "out")) + (map (lambda (spec) + (call-with-values + (lambda () + (package-specification->name+version+output spec)) + list)) + '("guile" + "guile-2.0.9" + "guile:debug" + "guile-2.0.9:debug" + "guile-cairo-1.4.1"))) + (test-equal "integer" '(1) (string->generations "1")) |