1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

records: `alist->record' supports multiple-field occurrences.

* guix/records.scm (alist->record): Add `multiple-value-keys'
  parameter.  Update docstring, and honor it.
* tests/records.scm ("alist->record"): New record.
This commit is contained in:
Ludovic Courtès
2013-07-10 18:04:08 +02:00
parent b7b8828801
commit c8772a7a21
2 changed files with 19 additions and 3 deletions

View File

@@ -158,6 +158,12 @@ Version: 1.5
(list (recutils->alist p)
(recutils->alist p))))
(test-equal "alist->record" '((1 2) b c)
(alist->record '(("a" . 1) ("b" . b) ("c" . c) ("a" . 2))
list
'("a" "b" "c")
'("a")))
(test-end)