openat: don’t close (-1)
[gnulib.git] / tests / test-wctype.c
blob134096ad86951a3fcca8e3e336f5b4e7d1d9413c
1 /* Test of getting descriptor for a wide character property.
2 Copyright (C) 2023-2024 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
17 /* Written by Bruno Haible <bruno@clisp.org>, 2023. */
19 #include <config.h>
21 #include <wctype.h>
23 #include "signature.h"
24 SIGNATURE_CHECK (wctype, wctype_t, (const char *));
26 #include "macros.h"
28 int
29 main (int argc, char *argv[])
31 wctype_t desc;
33 desc = wctype ("any");
34 ASSERT (desc == (wctype_t) 0);
36 desc = wctype ("blank");
37 ASSERT (desc != (wctype_t) 0);
39 desc = wctype ("space");
40 ASSERT (desc != (wctype_t) 0);
42 desc = wctype ("punct");
43 ASSERT (desc != (wctype_t) 0);
45 desc = wctype ("lower");
46 ASSERT (desc != (wctype_t) 0);
48 desc = wctype ("upper");
49 ASSERT (desc != (wctype_t) 0);
51 desc = wctype ("alpha");
52 ASSERT (desc != (wctype_t) 0);
54 desc = wctype ("digit");
55 ASSERT (desc != (wctype_t) 0);
57 desc = wctype ("xdigit");
58 ASSERT (desc != (wctype_t) 0);
60 desc = wctype ("alnum");
61 ASSERT (desc != (wctype_t) 0);
63 desc = wctype ("cntrl");
64 ASSERT (desc != (wctype_t) 0);
66 desc = wctype ("graph");
67 ASSERT (desc != (wctype_t) 0);
69 desc = wctype ("print");
70 ASSERT (desc != (wctype_t) 0);
72 return test_exit_status;