| /* Bug 18589: sort-test.sh fails at random. | 
 |    Copyright (C) 2015-2016 Free Software Foundation, Inc. | 
 |    This file is part of the GNU C Library. | 
 |  | 
 |    The GNU C Library is free software; you can redistribute it and/or | 
 |    modify it under the terms of the GNU Lesser General Public | 
 |    License as published by the Free Software Foundation; either | 
 |    version 2.1 of the License, or (at your option) any later version. | 
 |  | 
 |    The GNU C Library 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 | 
 |    Lesser General Public License for more details. | 
 |  | 
 |    You should have received a copy of the GNU Lesser General Public | 
 |    License along with the GNU C Library; if not, see | 
 |    <http://www.gnu.org/licenses/>.  */ | 
 |  | 
 | #include <stdio.h> | 
 | #include <string.h> | 
 | #include <locale.h> | 
 |  | 
 | /* An incorrect strcoll optimization resulted in incorrect | 
 |    results from strcoll for cs_CZ and da_DK.  */ | 
 |  | 
 | int | 
 | test_cs_CZ (void) | 
 | { | 
 |   const char t1[] = "config"; | 
 |   const char t2[] = "choose"; | 
 |   if (setlocale (LC_ALL, "cs_CZ.UTF-8") == NULL) | 
 |     { | 
 |       perror ("setlocale"); | 
 |       return 1; | 
 |     } | 
 |   /* In Czech the digraph ch sorts after c, therefore we expect | 
 |      config to sort before choose.  */ | 
 |   int a = strcoll (t1, t2); | 
 |   int b = strcoll (t2, t1); | 
 |   printf ("strcoll (\"%s\", \"%s\") = %d\n", t1, t2, a); | 
 |   printf ("strcoll (\"%s\", \"%s\") = %d\n", t2, t1, b); | 
 |   if (a < 0 && b > 0) | 
 |     { | 
 |       puts ("PASS: config < choose"); | 
 |       return 0; | 
 |     } | 
 |   else | 
 |     { | 
 |       puts ("FAIL: Wrong sorting in cs_CZ.UTF-8."); | 
 |       return 1; | 
 |     } | 
 | } | 
 |  | 
 | int | 
 | test_da_DK (void) | 
 | { | 
 |   const char t1[] = "AS"; | 
 |   const char t2[] = "AA"; | 
 |   if (setlocale (LC_ALL, "da_DK.ISO-8859-1") == NULL) | 
 |     { | 
 |       perror ("setlocale"); | 
 |       return 1; | 
 |     } | 
 |   /* AA should be treated as the last letter of the Danish alphabet, | 
 |      hence sorting after AS.  */ | 
 |   int a = strcoll (t1, t2); | 
 |   int b = strcoll (t2, t1); | 
 |   printf ("strcoll (\"%s\", \"%s\") = %d\n", t1, t2, a); | 
 |   printf ("strcoll (\"%s\", \"%s\") = %d\n", t2, t1, b); | 
 |   if (a < 0 && b > 0) | 
 |     { | 
 |       puts ("PASS: AS < AA"); | 
 |       return 0; | 
 |     } | 
 |   else | 
 |     { | 
 |       puts ("FAIL: Wrong sorting in da_DK.ISO-8859-1"); | 
 |       return 1; | 
 |     } | 
 | } | 
 |  | 
 | static int | 
 | do_test (void) | 
 | { | 
 |   int err = 0; | 
 |   err |= test_cs_CZ (); | 
 |   err |= test_da_DK (); | 
 |   return err; | 
 | } | 
 |  | 
 | #define TEST_FUNCTION do_test () | 
 | #include "../test-skeleton.c" |