mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 13:49:17 +02:00
10 lines
362 B
Scheme
10 lines
362 B
Scheme
|
|
;; Adaptation of John Cowan's reference impl for chibi, using the
|
|
;; our own char-set:title-case.
|
|
|
|
(define-library (srfi 129)
|
|
(import (scheme base) (scheme char)
|
|
(srfi 1)
|
|
(chibi char-set) (chibi char-set full) (chibi string))
|
|
(export char-title-case? char-titlecase string-titlecase)
|
|
(include "129/titlemaps.scm" "129/titlecase.scm"))
|