mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-18 21:29:19 +02:00
23 lines
852 B
Scheme
23 lines
852 B
Scheme
;; Character sets for Unicode boundaries, TR29.
|
|
;; This code is written by Alex Shinn and placed in the
|
|
;; Public Domain. All warranties are disclaimed.
|
|
|
|
(define-library (chibi char-set boundary)
|
|
(cond-expand
|
|
(chibi
|
|
(import (chibi) (chibi char-set)))
|
|
(else
|
|
(import (scheme base) (srfi 14))
|
|
(begin (define (immutable-char-set cs) cs))))
|
|
(export char-set:regional-indicator
|
|
char-set:extend-or-spacing-mark
|
|
char-set:hangul-l
|
|
char-set:hangul-v
|
|
char-set:hangul-t
|
|
char-set:hangul-lv
|
|
char-set:hangul-lvt)
|
|
;; generated with:
|
|
;; tools/extract-unicode-props.scm --derived GraphemeBreakProperty.txt
|
|
;; Control extend-or-spacing-mark=Extend,SpacingMark Regional_Indicator
|
|
;; hangul-l=:L hangul-v=:V hangul-t=:T hangul-lv=:LV hangul-lvt=:LVT
|
|
(include "boundary.scm"))
|