diff options
author | Andreas Rottmann <a.rottmann@gmx.at> | 2010-06-19 14:51:04 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2010-06-19 14:51:04 +0200 |
commit | a2e0b12608ccc578f66473f67ffaafa4309b2c14 (patch) | |
tree | c0149c8c23bdccf951c8f327cfeab1cfd5f13e25 /module/rnrs.scm | |
parent | 0ce1c83bbedfb0b02aed8ed2dbaf27611bde608a (diff) | |
download | guile-a2e0b12608ccc578f66473f67ffaafa4309b2c14.tar.gz |
add rnrs unicode to the compound rnrs module
* module/rnrs.scm: import rnrs unicode and export all of its procedures.
Diffstat (limited to 'module/rnrs.scm')
-rw-r--r-- | module/rnrs.scm | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/module/rnrs.scm b/module/rnrs.scm index 5df53feed..4ba9e2a56 100644 --- a/module/rnrs.scm +++ b/module/rnrs.scm @@ -212,7 +212,18 @@ make-variable-transformer syntax syntax-case identifier? bound-identifier=? free-identifier=? syntax->datum datum->syntax generate-temporaries with-syntax quasisyntax unsyntax - unsyntax-splicing syntax-violation) + unsyntax-splicing syntax-violation + + ;; (rnrs unicode) + + char-upcase char-downcase char-titlecase char-foldcase + char-ci=? char-ci<? char-ci>? char-ci<=? char-ci>=? + char-alphabetic? char-numeric? char-whitespace? char-upper-case? + char-lower-case? char-title-case? char-general-category + string-upcase string-downcase string-titlecase string-foldcase + string-ci=? string-ci<? string-ci>? string-ci<=? string-ci>=? + string-normalize-nfd string-normalize-nfkd string-normalize-nfc + string-normalize-nfkc) (import (rnrs arithmetic bitwise (6)) (rnrs arithmetic fixnums (6)) @@ -237,4 +248,5 @@ (rnrs records procedural (6)) (rnrs records syntactic (6)) (rnrs sorting (6)) - (rnrs syntax-case (6)))) + (rnrs syntax-case (6)) + (rnrs unicode (6)))) |