]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - gdb/testsuite/gdb.base/wchar.c
45d1a6210ec34b2a8b7fbf6a2693d36710511212
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.base / wchar.c
1 /* This testcase is part of GDB, the GNU debugger.
2
3 Copyright 2011-2020 Free Software Foundation, Inc.
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
9
10 This program 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
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17
18 #include <wchar.h>
19
20 void
21 do_nothing (wchar_t *c)
22 {
23 }
24
25 int
26 main (void)
27 {
28 int i;
29 wchar_t narrow = 97;
30 wchar_t single = 0xbeef;
31 wchar_t simple[] = L"facile";
32 wchar_t difficile[] = { 0xdead, 0xbeef, 0xfeed, 0xface};
33 wchar_t mixed[] = {L'f', 0xdead, L'a', L'c', 0xfeed, 0xface};
34 wchar_t *cent = L"\242";
35 wchar_t repeat[128];
36 wchar_t *repeat_p = repeat;
37
38 repeat[0] = 0;
39 wcscat (repeat, L"A");
40 for (i = 0; i < 21; ++i)
41 wcscat (repeat, cent);
42 wcscat (repeat, L"B");
43
44 do_nothing (&narrow); /* START */
45 do_nothing (&single);
46 do_nothing (simple);
47 do_nothing (difficile);
48 do_nothing (mixed);
49 }
50