mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 13:49:17 +02:00
11 lines
229 B
Scheme
11 lines
229 B
Scheme
|
|
(define char-foldcase char-downcase)
|
|
|
|
(define (string-downcase str)
|
|
(string-map char-downcase str))
|
|
|
|
(define (string-upcase str)
|
|
(string-map char-upcase str))
|
|
|
|
(define (string-foldcase str)
|
|
(string-map char-foldcase str))
|