| 1234567891011121314151617 |
- ; Copyright (c) 1993-2008 by Richard Kelsey and Jonathan Rees. See file COPYING.
- (define-structure unicode-data (export create-unicode-tables)
- (open scheme
- finite-types destructuring define-record-types bitwise tables
- (subset srfi-13 (string-contains
- string-index string-prefix? string-suffix? string-skip
- string-trim-both))
- (subset srfi-14 (char-set:hex-digit char-set:whitespace))
- (subset srfi-1 (iota find filter-map))
- srfi-23 ; ERROR
- sort
- )
- (files "../big/compact-table.scm" ; so we run on older Scheme 48
- "../env/unicode-category.scm"
- unicode-data))
|
