Mercurial > hg > octave-kai > gnulib-hg
annotate lib/unicase/u32-is-lowercase.c @ 11361:c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
author | Bruno Haible <bruno@clisp.org> |
---|---|
date | Sun, 08 Mar 2009 16:58:40 +0100 |
parents | |
children | e8d2c6fc33ad |
rev | line source |
---|---|
11361
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
1 /* Test whether an UTF-32 string is entirely lower case. |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
2 Copyright (C) 2009 Free Software Foundation, Inc. |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
3 Written by Bruno Haible <bruno@clisp.org>, 2009. |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
4 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
5 This program is free software: you can redistribute it and/or modify it |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
6 under the terms of the GNU Lesser General Public License as published |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
7 by the Free Software Foundation; either version 3 of the License, or |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
8 (at your option) any later version. |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
9 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
10 This program is distributed in the hope that it will be useful, |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
11 but WITHOUT ANY WARRANTY; without even the implied warranty of |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
13 Lesser General Public License for more details. |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
14 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
15 You should have received a copy of the GNU Lesser General Public License |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
17 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
18 #include <config.h> |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
19 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
20 /* Specification. */ |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
21 #include "unicase.h" |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
22 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
23 #include "unicase/invariant.h" |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
24 |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
25 int |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
26 u32_is_lowercase (const uint32_t *s, size_t n, const char *iso639_language, |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
27 bool *resultp) |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
28 { |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
29 return u32_is_invariant (s, n, u32_tolower, iso639_language, resultp); |
c6e560f2ddc4
New module 'unicase/u32-is-lowercase'.
Bruno Haible <bruno@clisp.org>
parents:
diff
changeset
|
30 } |