brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add string repeat tests.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-22 19:11:40 +01:00
parent 64ff4255e3
commit b8eed3b877
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
utils.scm
View file

@ -65,6 +65,12 @@
utils utils
(test-equal? filter (filter odd? '(1 2 3 4)) '(1 3)) (test-equal? filter (filter odd? '(1 2 3 4)) '(1 3))
(test-equal? filter (filter odd? '(2 4)) '()) (test-equal? filter (filter odd? '(2 4)) '())
(test-equal? string-repeat
(string-repeat "-" 4)
"----")
(test-equal? string-repeat
(string-repeat "š" 4)
"šššš")
)) ))
) )