projects
/
mes.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
dfabe9b
)
test: Add test for append-map.
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 2 Apr 2017 06:04:25 +0000
(08:04 +0200)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 2 Apr 2017 06:04:25 +0000
(08:04 +0200)
* tests/srfi-1.test ("append-map"): New test.
tests/srfi-1.test
patch
|
blob
|
history
diff --git
a/tests/srfi-1.test
b/tests/srfi-1.test
index fd739bb1aeaa52ff20c20acfbb4dff785771090d..6a4bfb4e8c842994b94a993d35a1916974b8dcde 100755
(executable)
--- a/
tests/srfi-1.test
+++ b/
tests/srfi-1.test
@@
-56,4
+56,8
@@
exit $?
(pass-if-not "member ="
(member 2 '(1 4) =))
+(pass-if-equal "append-map"
+ '(0 0 1)
+ (append-map iota '(1 2)))
+
(result 'report)