Work on removing irelevant parts of util-string.
This commit is contained in:
parent
a576779891
commit
0b383c6fa6
1 changed files with 0 additions and 7 deletions
|
@ -31,7 +31,6 @@
|
|||
string-first+rest
|
||||
|
||||
string-utf8?
|
||||
string->list/utf8
|
||||
|
||||
string->qp
|
||||
|
||||
|
@ -103,12 +102,6 @@
|
|||
(define (string-tests!)
|
||||
(run-tests
|
||||
util-string
|
||||
(test-equal? string-repeat
|
||||
(string-repeat "-" 4)
|
||||
"----")
|
||||
(test-equal? string-repeat
|
||||
(string-repeat "š" 4)
|
||||
"šššš")
|
||||
(test-equal? string-first+rest
|
||||
(string-first+rest "asdf rest")
|
||||
'("asdf" . "rest"))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue