Use libm_alias_ldouble_other in ldbl-64-128/s_nextafterl.c.
[glibc.git] / intl / tst-codeset.c
blob628b2ccc4bccad6db4dd9f0dbaf8f87eadbe9174
1 /* Test of bind_textdomain_codeset.
2 Copyright (C) 2001-2017 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Bruno Haible <haible@clisp.cons.org>, 2001.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
20 #include <libintl.h>
21 #include <locale.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
26 static int
27 do_test (void)
29 char *s;
30 int result = 0;
32 unsetenv ("LANGUAGE");
33 unsetenv ("OUTPUT_CHARSET");
34 setlocale (LC_ALL, "de_DE.ISO-8859-1");
35 textdomain ("codeset");
36 bindtextdomain ("codeset", OBJPFX "domaindir");
38 /* Here we expect output in ISO-8859-1. */
39 s = gettext ("cheese");
40 if (strcmp (s, "K\344se"))
42 printf ("call 1 returned: %s\n", s);
43 result = 1;
46 bind_textdomain_codeset ("codeset", "UTF-8");
48 /* Here we expect output in UTF-8. */
49 s = gettext ("cheese");
50 if (strcmp (s, "K\303\244se"))
52 printf ("call 2 returned: %s\n", s);
53 result = 1;
56 return result;
59 #define TEST_FUNCTION do_test ()
60 #include "../test-skeleton.c"