Change copyright notice from GPLv2+ to GPLv3+.
[pspp] / tests / uniwidth / test-uc_width.c
1 /* Test of uc_width() function.
2    Copyright (C) 2007 Free Software Foundation, Inc.
3
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.
8
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.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16
17 /* Written by Bruno Haible <bruno@clisp.org>, 2007.  */
18
19 #include <config.h>
20
21 #include "uniwidth.h"
22
23 #include <stdio.h>
24 #include <stdlib.h>
25
26 #define ASSERT(expr) \
27   do                                                                         \
28     {                                                                        \
29       if (!(expr))                                                           \
30         {                                                                    \
31           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
32           abort ();                                                          \
33         }                                                                    \
34     }                                                                        \
35   while (0)
36
37 int
38 main ()
39 {
40   ucs4_t uc;
41
42   /* Test width of ASCII characters.  */
43   for (uc = 0x0020; uc < 0x007F; uc++)
44     ASSERT (uc_width (uc, "ISO-8859-2") == 1);
45
46   /* Test width of some non-spacing characters.  */
47   ASSERT (uc_width (0x0301, "UTF-8") == 0);
48   ASSERT (uc_width (0x05B0, "UTF-8") == 0);
49
50   /* Test width of some format control characters.  */
51   ASSERT (uc_width (0x200E, "UTF-8") == 0);
52   ASSERT (uc_width (0x2060, "UTF-8") == 0);
53   ASSERT (uc_width (0xE0001, "UTF-8") == 0);
54   ASSERT (uc_width (0xE0044, "UTF-8") == 0);
55
56   /* Test width of some zero width characters.  */
57   ASSERT (uc_width (0x200B, "UTF-8") == 0);
58   ASSERT (uc_width (0xFEFF, "UTF-8") == 0);
59
60   /* Test width of some CJK characters.  */
61   ASSERT (uc_width (0x3000, "UTF-8") == 2);
62   ASSERT (uc_width (0xB250, "UTF-8") == 2);
63   ASSERT (uc_width (0xFF1A, "UTF-8") == 2);
64   ASSERT (uc_width (0x20369, "UTF-8") == 2);
65   ASSERT (uc_width (0x2F876, "UTF-8") == 2);
66
67   return 0;
68 }