1 /* This testcase is part of GDB, the GNU debugger.
3 Copyright 2001, 2004, 2007, 2008, 2009, 2010, 2011
4 Free Software Foundation, Inc.
6 Contributed by Red Hat, originally written by Jim Blandy.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 Please email any bugs, comments, and/or additions to this file to:
24 /* X_string is a null-terminated string in the X charset whose
25 elements are as follows. X should be the name the `set charset'
26 command uses for the character set, in lower-case, with any
27 non-identifier characters replaced with underscores. Where a
28 character set doesn't have the given character, the string should
29 contain the character 'x'.
31 [0] --- the `alert' character, '\a'
32 [1] --- the `backspace' character, '\b'
33 [2] --- the `form feed' character, '\f'
34 [3] --- the `line feed' character, '\n'
35 [4] --- the `carriage return' character, '\r'
36 [5] --- the `horizontal tab' character, '\t'
37 [6] --- the `vertical tab' character, '\v'
38 [7 .. 32] --- the uppercase letters A-Z
39 [33 .. 58] --- the lowercase letters a-z
40 [59 .. 68] --- the digits 0-9
41 [69] --- the `cent' character
42 [70] --- a control character with no defined backslash escape
44 Feel free to extend these as you like. */
46 #define NUM_CHARS (71)
48 char ascii_string
[NUM_CHARS
];
49 char iso_8859_1_string
[NUM_CHARS
];
50 char ebcdic_us_string
[NUM_CHARS
];
51 char ibm1047_string
[NUM_CHARS
];
53 /* We make a phony wchar_t and then pretend that this platform uses
54 UTF-32 (or UTF-16, depending on the size -- same difference for the
55 purposes of this test). */
56 typedef unsigned int wchar_t;
57 wchar_t utf_32_string
[NUM_CHARS
];
59 /* We also define a couple phony types for testing the u'' and U''
60 support. It is ok if these have the wrong size on some platforms
61 -- the test case will skip the tests in that case. */
62 typedef unsigned short char16_t
;
63 typedef unsigned int char32_t
;
65 /* Make sure to use the typedefs. */
72 /* A typedef to a typedef should also work. */
73 typedef wchar_t my_wchar_t
;
76 /* Some arrays for simple assignment tests. */
82 init_string (char string
[],
84 char alert
, char backspace
, char form_feed
,
85 char line_feed
, char carriage_return
, char horizontal_tab
,
86 char vertical_tab
, char cent
, char misc_ctrl
)
90 for (i
= 0; i
< NUM_CHARS
; ++i
)
93 string
[1] = backspace
;
94 string
[2] = form_feed
;
95 string
[3] = line_feed
;
96 string
[4] = carriage_return
;
97 string
[5] = horizontal_tab
;
98 string
[6] = vertical_tab
;
100 string
[70] = misc_ctrl
;
105 fill_run (char string
[], int start
, int len
, int first
)
109 for (i
= 0; i
< len
; i
++)
110 string
[start
+ i
] = first
+ i
;
119 for (i
= 0; i
< NUM_CHARS
; ++i
)
120 utf_32_string
[i
] = iso_8859_1_string
[i
] & 0xff;
123 extern void malloc_stub (void);
134 /* Initialize ascii_string. */
135 init_string (ascii_string
,
140 fill_run (ascii_string
, 7, 26, 65);
141 fill_run (ascii_string
, 33, 26, 97);
142 fill_run (ascii_string
, 59, 10, 48);
144 /* Initialize iso_8859_1_string. */
145 init_string (iso_8859_1_string
,
150 fill_run (iso_8859_1_string
, 7, 26, 65);
151 fill_run (iso_8859_1_string
, 33, 26, 97);
152 fill_run (iso_8859_1_string
, 59, 10, 48);
154 /* Initialize ebcdic_us_string. */
155 init_string (ebcdic_us_string
,
160 /* In EBCDIC, the upper-case letters are broken into three separate runs. */
161 fill_run (ebcdic_us_string
, 7, 9, 193);
162 fill_run (ebcdic_us_string
, 16, 9, 209);
163 fill_run (ebcdic_us_string
, 25, 8, 226);
164 /* The lower-case letters are, too. */
165 fill_run (ebcdic_us_string
, 33, 9, 129);
166 fill_run (ebcdic_us_string
, 42, 9, 145);
167 fill_run (ebcdic_us_string
, 51, 8, 162);
168 /* The digits, at least, are contiguous. */
169 fill_run (ebcdic_us_string
, 59, 10, 240);
171 /* Initialize ibm1047_string. */
172 init_string (ibm1047_string
,
177 /* In EBCDIC, the upper-case letters are broken into three separate runs. */
178 fill_run (ibm1047_string
, 7, 9, 193);
179 fill_run (ibm1047_string
, 16, 9, 209);
180 fill_run (ibm1047_string
, 25, 8, 226);
181 /* The lower-case letters are, too. */
182 fill_run (ibm1047_string
, 33, 9, 129);
183 fill_run (ibm1047_string
, 42, 9, 145);
184 fill_run (ibm1047_string
, 51, 8, 162);
185 /* The digits, at least, are contiguous. */
186 fill_run (ibm1047_string
, 59, 10, 240);
190 myvar
= utf_32_string
[7];
192 return 0; /* all strings initialized */
This page took 0.033275 seconds and 4 git commands to generate.