diff --git a/src/util-string.scm b/src/util-string.scm index 55980b8..ac967ef 100644 --- a/src/util-string.scm +++ b/src/util-string.scm @@ -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"))