~peter-pearse/ubuntu/natty/guile-1.8/prop001

« back to all changes in this revision

Viewing changes to srfi/srfi-14.scm

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Schepler
  • Date: 2006-11-09 03:11:16 UTC
  • Revision ID: james.westby@ubuntu.com-20061109031116-hu0q1jxqg12y6yeg
Tags: upstream-1.8.1+1
ImportĀ upstreamĀ versionĀ 1.8.1+1

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
;;; srfi-14.scm --- Character-set Library
 
2
 
 
3
;;      Copyright (C) 2001, 2002, 2004, 2006 Free Software Foundation, Inc.
 
4
;;
 
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,
 
11
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
 
12
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 
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
 
17
;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 
18
 
 
19
;;; Commentary:
 
20
 
 
21
;; This module is fully documented in the Guile Reference Manual.
 
22
 
 
23
;;; Code:
 
24
 
 
25
(define-module (srfi srfi-14))
 
26
 
 
27
(re-export
 
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!
 
48
 string->char-set string->char-set!
 
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
 
95
 char-set:full)
 
96
 
 
97
(cond-expand-provide (current-module) '(srfi-14))
 
98
 
 
99
;;; srfi-14.scm ends here