HCoop / bpt / guile.git / blame
| Commit | Line | Data |
|---|---|---|
| 6be07c52 TTN |
1 | ;;; srfi-14.scm --- Character-set Library |
| 2 | ||
| 1b09b607 | 3 | ;; Copyright (C) 2001, 2002, 2004, 2006 Free Software Foundation, Inc. |
| 6be07c52 | 4 | ;; |
| 73be1d9e MV |
5 | ;; This library is free software; you can redistribute it and/or |
| 6 | ;; modify it under the terms of the GNU Lesser General Public | |
| 7 | ;; License as published by the Free Software Foundation; either | |
| 8 | ;; version 2.1 of the License, or (at your option) any later version. | |
| 9 | ;; | |
| 10 | ;; This library is distributed in the hope that it will be useful, | |
| 6be07c52 TTN |
11 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 12 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 73be1d9e MV |
13 | ;; Lesser General Public License for more details. |
| 14 | ;; | |
| 15 | ;; You should have received a copy of the GNU Lesser General Public | |
| 16 | ;; License along with this library; if not, write to the Free Software | |
| 92205699 | 17 | ;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
| ead45146 TTN |
18 | |
| 19 | ;;; Commentary: | |
| 20 | ||
| 21 | ;; This module is fully documented in the Guile Reference Manual. | |
| 22 | ||
| 23 | ;;; Code: | |
| ca003b26 | 24 | |
| 0081b349 MV |
25 | (define-module (srfi srfi-14)) |
| 26 | ||
| 27 | (re-export | |
| ca003b26 MG |
28 | ;;; General procedures |
| 29 | char-set? | |
| 30 | char-set= | |
| 31 | char-set<= | |
| 32 | char-set-hash | |
| 33 | ||
| 34 | ;;; Iterating over character sets | |
| 35 | char-set-cursor | |
| 36 | char-set-ref | |
| 37 | char-set-cursor-next | |
| 38 | end-of-char-set? | |
| 39 | char-set-fold | |
| 40 | char-set-unfold char-set-unfold! | |
| 41 | char-set-for-each | |
| 42 | char-set-map | |
| 43 | ||
| 44 | ;;; Creating character sets | |
| 45 | char-set-copy | |
| 46 | char-set | |
| 47 | list->char-set list->char-set! | |
| 8b19021c | 48 | string->char-set string->char-set! |
| ca003b26 MG |
49 | char-set-filter char-set-filter! |
| 50 | ucs-range->char-set ucs-range->char-set! | |
| 51 | ->char-set | |
| 52 | ||
| 53 | ;;; Querying character sets | |
| 54 | char-set-size | |
| 55 | char-set-count | |
| 56 | char-set->list | |
| 57 | char-set->string | |
| 58 | char-set-contains? | |
| 59 | char-set-every | |
| 60 | char-set-any | |
| 61 | ||
| 62 | ;;; Character set algebra | |
| 63 | char-set-adjoin char-set-adjoin! | |
| 64 | char-set-delete char-set-delete! | |
| 65 | char-set-complement | |
| 66 | char-set-union | |
| 67 | char-set-intersection | |
| 68 | char-set-difference | |
| 69 | char-set-xor | |
| 70 | char-set-diff+intersection | |
| 71 | char-set-complement! | |
| 72 | char-set-union! | |
| 73 | char-set-intersection! | |
| 74 | char-set-difference! | |
| 75 | char-set-xor! | |
| 76 | char-set-diff+intersection! | |
| 77 | ||
| 78 | ;;; Standard character sets | |
| 79 | char-set:lower-case | |
| 80 | char-set:upper-case | |
| 81 | char-set:title-case | |
| 82 | char-set:letter | |
| 83 | char-set:digit | |
| 84 | char-set:letter+digit | |
| 85 | char-set:graphic | |
| 86 | char-set:printing | |
| 87 | char-set:whitespace | |
| 88 | char-set:iso-control | |
| 89 | char-set:punctuation | |
| 90 | char-set:symbol | |
| 91 | char-set:hex-digit | |
| 92 | char-set:blank | |
| 93 | char-set:ascii | |
| 94 | char-set:empty | |
| 0081b349 | 95 | char-set:full) |
| ca003b26 | 96 | |
| 1b2f40b9 MG |
97 | (cond-expand-provide (current-module) '(srfi-14)) |
| 98 | ||
| ead45146 | 99 | ;;; srfi-14.scm ends here |