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

Parsing of month comments.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-27 17:05:56 +02:00
parent f06949b545
commit 58f6391345
2 changed files with 13 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

9
utils.scm
View file

@ -85,6 +85,15 @@
(test-equal? string-repeat
(string-repeat "š" 4)
"šššš")
(test-equal? string-first+rest
(string-first+rest "asdf rest")
'("asdf" . "rest"))
(test-equal? string-first+rest
(string-first+rest "asdf rest test rest")
'("asdf" . "rest test rest"))
(test-equal? string-first+rest
(string-first+rest "asdf")
'("asdf" . ""))
))
)