Mercurial > hg > octave-jordi > gnulib-hg
view tests/test-duplocale.c @ 17960:1c04e5182252
git-version-gen: revert "detect untagged revisions"
Revert commit bedd7833 as it breaks `make dist` in Inetutils
at least, due to the interdependencies with top/GNUMakefile,
which depend on the tag prefixes. This results in `make dist`
inducing a new call to autoconf where a simple tar-ball build
would be expected.
author | Mats Erik Andersson <mats.andersson@gisladisker.se> |
---|---|
date | Tue, 14 Apr 2015 21:25:59 +0100 |
parents | 05a21d5b996b |
children |
line wrap: on
line source
/* Test of duplicating a locale object. Copyright (C) 2009-2015 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ /* Written by Bruno Haible <bruno@clisp.org>, 2007. */ #include <config.h> #include <locale.h> #if HAVE_DUPLOCALE && HAVE_MONETARY_H #include "signature.h" SIGNATURE_CHECK (duplocale, locale_t, (locale_t)); #include <langinfo.h> #include <monetary.h> #include <stdio.h> #include <string.h> #include "macros.h" struct locale_dependent_values { char monetary[100]; char numeric[100]; char time[100]; }; static void get_locale_dependent_values (struct locale_dependent_values *result) { strfmon (result->monetary, sizeof (result->monetary), "%n", 123.75); /* result->monetary is usually "$123.75" */ snprintf (result->numeric, sizeof (result->numeric), "%g", 3.5); /* result->numeric is usually "3,5" */ strcpy (result->time, nl_langinfo (MON_1)); /* result->time is usually "janvier" */ } int main () { struct locale_dependent_values expected_results; locale_t mixed1; locale_t mixed2; /* Set up a locale which is a mix between different system locales. */ setlocale (LC_ALL, "en_US.UTF-8"); setlocale (LC_NUMERIC, "de_DE.UTF-8"); setlocale (LC_TIME, "fr_FR.UTF-8"); get_locale_dependent_values (&expected_results); /* Save the locale in a locale_t object. */ mixed1 = duplocale (LC_GLOBAL_LOCALE); ASSERT (mixed1 != NULL); /* Use a per-thread locale. */ uselocale (newlocale (LC_ALL_MASK, "es_ES.UTF-8", NULL)); /* Save the locale in a locale_t object again. */ mixed2 = duplocale (LC_GLOBAL_LOCALE); ASSERT (mixed2 != NULL); /* Set up a default locale. */ setlocale (LC_ALL, "C"); uselocale (LC_GLOBAL_LOCALE); { struct locale_dependent_values c_results; get_locale_dependent_values (&c_results); } /* Now use the saved locale mixed1 again. */ setlocale (LC_ALL, "C"); uselocale (LC_GLOBAL_LOCALE); uselocale (mixed1); { struct locale_dependent_values results; get_locale_dependent_values (&results); ASSERT (strcmp (results.monetary, expected_results.monetary) == 0); ASSERT (strcmp (results.numeric, expected_results.numeric) == 0); ASSERT (strcmp (results.time, expected_results.time) == 0); } /* Now use the saved locale mixed2 again. */ setlocale (LC_ALL, "C"); uselocale (LC_GLOBAL_LOCALE); uselocale (mixed2); { struct locale_dependent_values results; get_locale_dependent_values (&results); ASSERT (strcmp (results.monetary, expected_results.monetary) == 0); ASSERT (strcmp (results.numeric, expected_results.numeric) == 0); ASSERT (strcmp (results.time, expected_results.time) == 0); } return 0; } #else #include <stdio.h> int main () { fprintf (stderr, "Skipping test: function duplocale not available\n"); return 77; } #endif