'gcc-3_1-branch'.
From-SVN: r53842
--- /dev/null
+// Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+// XXX This test (test02) is not working for non-glibc locale models.
+// { dg-do run { xfail *-*-* } }
+
+typedef char char_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+void test01()
+{
+ bool test = true;
+ const char_type strlit00[] = "manilla, cebu, tandag PHILIPPINES";
+ const char_type strlit01[] = "MANILLA, CEBU, TANDAG PHILIPPINES";
+ const char_type strlit02[] = "manilla, cebu, tandag philippines";
+ const char_type c00 = 'S';
+ const char_type c10 = 's';
+ const char_type c20 = '9';
+ const char_type c30 = ' ';
+ const char_type c40 = '!';
+ const char_type c50 = 'F';
+ const char_type c60 = 'f';
+ const char_type c70 = 'X';
+ const char_type c80 = 'x';
+
+ gnu_ctype gctype;
+ char_type c100;
+ int len = std::char_traits<char_type>::length(strlit00);
+ char_type c_array[len + 1];
+
+ // sanity check ctype_base::mask members
+ int i01 = std::ctype_base::space;
+ int i02 = std::ctype_base::upper;
+ int i03 = std::ctype_base::lower;
+ int i04 = std::ctype_base::digit;
+ int i05 = std::ctype_base::punct;
+ int i06 = std::ctype_base::alpha;
+ int i07 = std::ctype_base::xdigit;
+ int i08 = std::ctype_base::alnum;
+ int i09 = std::ctype_base::graph;
+ int i10 = std::ctype_base::print;
+ int i11 = std::ctype_base::cntrl;
+ int i12 = sizeof(std::ctype_base::mask);
+ VERIFY ( i01 != i02);
+ VERIFY ( i02 != i03);
+ VERIFY ( i03 != i04);
+ VERIFY ( i04 != i05);
+ VERIFY ( i05 != i06);
+ VERIFY ( i06 != i07);
+ VERIFY ( i07 != i08);
+ VERIFY ( i08 != i09);
+ VERIFY ( i09 != i10);
+ VERIFY ( i10 != i11);
+ VERIFY ( i11 != i01);
+
+ // bool is(mask m, char_type c) const;
+ VERIFY( gctype.is(std::ctype_base::space, c30) );
+ VERIFY( gctype.is(std::ctype_base::upper, c00) );
+ VERIFY( gctype.is(std::ctype_base::lower, c10) );
+ VERIFY( gctype.is(std::ctype_base::digit, c20) );
+ VERIFY( gctype.is(std::ctype_base::punct, c40) );
+ VERIFY( gctype.is(std::ctype_base::alpha, c50) );
+ VERIFY( gctype.is(std::ctype_base::alpha, c60) );
+ VERIFY( gctype.is(std::ctype_base::xdigit, c20) );
+ VERIFY( !gctype.is(std::ctype_base::xdigit, c80) );
+ VERIFY( gctype.is(std::ctype_base::alnum, c50) );
+ VERIFY( gctype.is(std::ctype_base::alnum, c20) );
+ VERIFY( gctype.is(std::ctype_base::graph, c40) );
+ VERIFY( gctype.is(std::ctype_base::graph, c20) );
+
+ // const char* is(const char* low, const char* high, mask* vec) const
+ std::ctype_base::mask m00 = static_cast<std::ctype_base::mask>(0);
+ std::ctype_base::mask m01[3];
+ std::ctype_base::mask m02[13];
+ const char_type* cc0 = strlit00;
+ const char_type* cc1 = NULL;
+ const char_type* cc2 = NULL;
+
+ cc0 = strlit00;
+ m01[0] = m00;
+ m01[1] = m00;
+ m01[2] = m00;
+ cc1 = gctype.is(cc0, cc0, m01);
+ VERIFY( cc1 == strlit00 );
+ VERIFY( m01[0] == m00 );
+ VERIFY( m01[1] == m00 );
+ VERIFY( m01[2] == m00 );
+
+ cc0 = strlit00;
+ m01[0] = m00;
+ m01[1] = m00;
+ m01[2] = m00;
+ cc2 = gctype.is(cc0, cc0 + 3, m01);
+ VERIFY( cc2 == strlit00 + 3);
+ VERIFY( m01[0] != m00 );
+ VERIFY( m01[1] != m00 );
+ VERIFY( m01[2] != m00 );
+ VERIFY( gctype.is(m01[0], cc0[0]) );
+ VERIFY( gctype.is(m01[1], cc0[1]) );
+ VERIFY( gctype.is(m01[2], cc0[2]) );
+
+ cc0 = strlit01;
+ cc1 = gctype.is(cc0, cc0 + 13, m02);
+ VERIFY( cc1 == strlit01 + 13);
+ VERIFY( m02[6] != m00 );
+ VERIFY( m02[7] != m00 );
+ VERIFY( m02[8] != m00 );
+ VERIFY( m02[8] != m02[6] );
+ VERIFY( m02[6] != m02[7] );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::alnum) );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::upper) );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::alpha) );
+ VERIFY( static_cast<bool>(m02[7] & std::ctype_base::punct) );
+ VERIFY( static_cast<bool>(m02[8] & std::ctype_base::space) );
+ VERIFY( gctype.is(m02[6], cc0[6]) );
+ VERIFY( gctype.is(m02[7], cc0[7]) );
+ VERIFY( gctype.is(m02[8], cc0[8]) );
+}
+
+// libstdc++/4456, libstdc++/4457, libstdc++/4458
+void test02()
+{
+ using namespace std;
+ typedef ctype_base::mask mask;
+ typedef vector<mask> vector_type;
+
+ bool test = true;
+
+ // const int max = numeric_limits<char>::max();
+ const int max = 255;
+ const int ctype_mask_max = 10;
+ vector_type v_c(max);
+ vector_type v_de(max);
+
+ // "C"
+ locale loc_c = locale::classic();
+ const ctype<char>& ctype_c = use_facet<ctype<char> >(loc_c);
+ for (int i = 0; i < max; ++i)
+ {
+ char_type c = static_cast<char>(i);
+ mask mask_test = static_cast<mask>(0);
+ mask mask_is = static_cast<mask>(0);
+ for (int j = 0; j <= ctype_mask_max; ++j)
+ {
+ mask_test = static_cast<mask>(1 << j);
+ if (ctype_c.is(mask_test, c))
+ mask_is |= mask_test;
+ }
+ v_c[i] = mask_is;
+ }
+
+ // "de_DE"
+ locale loc_de("de_DE");
+ const ctype<char>& ctype_de = use_facet<ctype<char> >(loc_de);
+ for (int i = 0; i < max; ++i)
+ {
+ char_type c = static_cast<char>(i);
+ mask mask_test = static_cast<mask>(0);
+ mask mask_is = static_cast<mask>(0);
+ for (int j = 0; j <= ctype_mask_max; ++j)
+ {
+ mask_test = static_cast<mask>(1 << j);
+ if (ctype_de.is(mask_test, c))
+ mask_is |= mask_test;
+ }
+ v_de[i] = mask_is;
+ }
+
+#if QUANNUM_VERBOSE_LYRICALLY_ADEPT_BAY_AREA_MCS_MODE
+ for (int i = 0; i < max; ++i)
+ {
+ char_type mark = v_c[i] == v_de[i] ? ' ' : '-';
+ cout << i << ' ' << mark << ' ' << static_cast<char>(i) << '\t' ;
+ cout << "v_c: " << setw(4) << v_c[i] << '\t';
+ cout << "v_de: " << setw(4) << v_de[i] << endl;
+ }
+ cout << (v_c == v_de) << endl;
+#endif
+
+ VERIFY( v_c != v_de );
+}
+
+// Per Liboriussen <liborius@stofanet.dk>
+void test03()
+{
+ bool test = true;
+ std::ctype_base::mask maskdata[256];
+ for (int i = 0; i < 256; ++i)
+ maskdata[i] = std::ctype_base::alpha;
+ std::ctype<char>* f = new std::ctype<char>(maskdata);
+ std::locale global;
+ std::locale loc(global, f);
+ for (int i = 0; i < 256; ++i)
+ {
+ char_type ch = i;
+ VERIFY( std::isalpha(ch, loc) );
+ }
+}
+
+// libstdc++/5280
+void test04()
+{
+#ifdef _GLIBCPP_HAVE_SETENV
+ // Set the global locale to non-"C".
+ std::locale loc_de("de_DE");
+ std::locale::global(loc_de);
+
+ // Set LANG environment variable to de_DE.
+ const char* oldLANG = getenv("LANG");
+ if (!setenv("LANG", "de_DE", 1))
+ {
+ test01();
+ test02();
+ test03();
+ setenv("LANG", oldLANG ? oldLANG : "", 1);
+ }
+#endif
+}
+
+// http://gcc.gnu.org/ml/libstdc++/2002-05/msg00038.html
+void test05()
+{
+ bool test = true;
+
+ const char* tentLANG = setlocale(LC_ALL, "ja_JP.eucjp");
+ if (tentLANG != NULL)
+ {
+ std::string preLANG = tentLANG;
+ test01();
+ test02();
+ test03();
+ std::string postLANG = setlocale(LC_ALL, NULL);
+ VERIFY( preLANG == postLANG );
+ }
+}
+
+int main()
+{
+ test01();
+ test02();
+ test03();
+ test04();
+ test05();
+ return 0;
+}
--- /dev/null
+// Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+// XXX This test (test02) is not working for non-glibc locale models.
+// { dg-do run { xfail *-*-* } }
+
+typedef wchar_t char_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+void test01()
+{
+ bool test = true;
+ const char_type strlit00[] = L"manilla, cebu, tandag PHILIPPINES";
+ const char_type strlit01[] = L"MANILLA, CEBU, TANDAG PHILIPPINES";
+ const char_type strlit02[] = L"manilla, cebu, tandag philippines";
+ const char_type c00 = L'S';
+ const char_type c10 = L's';
+ const char_type c20 = L'9';
+ const char_type c30 = L' ';
+ const char_type c40 = L'!';
+ const char_type c50 = L'F';
+ const char_type c60 = L'f';
+ const char_type c70 = L'X';
+ const char_type c80 = L'x';
+
+ gnu_ctype gctype;
+ char_type c100;
+ int len = std::char_traits<char_type>::length(strlit00);
+ char_type c_array[len + 1];
+
+ // sanity check ctype_base::mask members
+ int i01 = std::ctype_base::space;
+ int i02 = std::ctype_base::upper;
+ int i03 = std::ctype_base::lower;
+ int i04 = std::ctype_base::digit;
+ int i05 = std::ctype_base::punct;
+ int i06 = std::ctype_base::alpha;
+ int i07 = std::ctype_base::xdigit;
+ int i08 = std::ctype_base::alnum;
+ int i09 = std::ctype_base::graph;
+ int i10 = std::ctype_base::print;
+ int i11 = std::ctype_base::cntrl;
+ int i12 = sizeof(std::ctype_base::mask);
+ VERIFY ( i01 != i02);
+ VERIFY ( i02 != i03);
+ VERIFY ( i03 != i04);
+ VERIFY ( i04 != i05);
+ VERIFY ( i05 != i06);
+ VERIFY ( i06 != i07);
+ VERIFY ( i07 != i08);
+ VERIFY ( i08 != i09);
+ VERIFY ( i09 != i10);
+ VERIFY ( i10 != i11);
+ VERIFY ( i11 != i01);
+
+ // bool is(mask m, char_type c) const;
+ VERIFY( gctype.is(std::ctype_base::space, c30) );
+ VERIFY( gctype.is(std::ctype_base::upper, c00) );
+ VERIFY( gctype.is(std::ctype_base::lower, c10) );
+ VERIFY( gctype.is(std::ctype_base::digit, c20) );
+ VERIFY( gctype.is(std::ctype_base::punct, c40) );
+ VERIFY( gctype.is(std::ctype_base::alpha, c50) );
+ VERIFY( gctype.is(std::ctype_base::alpha, c60) );
+ VERIFY( gctype.is(std::ctype_base::xdigit, c20) );
+ VERIFY( !gctype.is(std::ctype_base::xdigit, c80) );
+ VERIFY( gctype.is(std::ctype_base::alnum, c50) );
+ VERIFY( gctype.is(std::ctype_base::alnum, c20) );
+ VERIFY( gctype.is(std::ctype_base::graph, c40) );
+ VERIFY( gctype.is(std::ctype_base::graph, c20) );
+
+ // const char* is(const char* low, const char* high, mask* vec) const
+ std::ctype_base::mask m00 = static_cast<std::ctype_base::mask>(0);
+ std::ctype_base::mask m01[3];
+ std::ctype_base::mask m02[13];
+ const char_type* cc0 = strlit00;
+ const char_type* cc1 = NULL;
+ const char_type* cc2 = NULL;
+
+ cc0 = strlit00;
+ m01[0] = m00;
+ m01[1] = m00;
+ m01[2] = m00;
+ cc1 = gctype.is(cc0, cc0, m01);
+ VERIFY( cc1 == strlit00 );
+ VERIFY( m01[0] == m00 );
+ VERIFY( m01[1] == m00 );
+ VERIFY( m01[2] == m00 );
+
+ cc0 = strlit00;
+ m01[0] = m00;
+ m01[1] = m00;
+ m01[2] = m00;
+ cc2 = gctype.is(cc0, cc0 + 3, m01);
+ VERIFY( cc2 == strlit00 + 3);
+#if 0
+ VERIFY( m01[0] != m00 );
+ VERIFY( m01[1] != m00 );
+ VERIFY( m01[2] != m00 );
+ VERIFY( gctype.is(m01[0], cc0[0]) );
+ VERIFY( gctype.is(m01[1], cc0[1]) );
+ VERIFY( gctype.is(m01[2], cc0[2]) );
+#endif
+
+ cc0 = strlit01;
+ cc1 = gctype.is(cc0, cc0 + 13, m02);
+ VERIFY( cc1 == strlit01 + 13);
+#if 0
+ VERIFY( m02[6] != m00 );
+ VERIFY( m02[7] != m00 );
+ VERIFY( m02[8] != m00 );
+ VERIFY( m02[8] != m02[6] );
+ VERIFY( m02[6] != m02[7] );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::alnum) );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::upper) );
+ VERIFY( static_cast<bool>(m02[6] & std::ctype_base::alpha) );
+ VERIFY( static_cast<bool>(m02[7] & std::ctype_base::punct) );
+ VERIFY( static_cast<bool>(m02[8] & std::ctype_base::space) );
+ VERIFY( gctype.is(m02[6], cc0[6]) );
+ VERIFY( gctype.is(m02[7], cc0[7]) );
+ VERIFY( gctype.is(m02[8], cc0[8]) );
+#endif
+}
+
+// libstdc++/5280
+void test04()
+{
+#ifdef _GLIBCPP_HAVE_SETENV
+ // Set the global locale to non-"C".
+ std::locale loc_de("de_DE");
+ std::locale::global(loc_de);
+
+ // Set LANG environment variable to de_DE.
+ const char* oldLANG = getenv("LANG");
+ if (!setenv("LANG", "de_DE", 1))
+ {
+ test01();
+ setenv("LANG", oldLANG ? oldLANG : "", 1);
+ }
+#endif
+}
+
+// http://gcc.gnu.org/ml/libstdc++/2002-05/msg00038.html
+void test05()
+{
+ bool test = true;
+
+ const char* tentLANG = setlocale(LC_ALL, "ja_JP.eucjp");
+ if (tentLANG != NULL)
+ {
+ std::string preLANG = tentLANG;
+ test01();
+ std::string postLANG = setlocale(LC_ALL, NULL);
+ VERIFY( preLANG == postLANG );
+ }
+}
+
+int main()
+{
+ test01();
+ test04();
+ test05();
+ return 0;
+}
--- /dev/null
+// 2002-05-24 bkoz
+
+// Copyright (C) 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+// libstdc++/6701
+void test01()
+{
+ using namespace std;
+ typedef char wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ basic_string<wide_type> wide("wibble");
+ basic_string<char> narrow("wibble");
+ vector<char> narrow_chars(wide.length() + 1);
+
+ // narrow(charT c, char dfault) const
+ for (int i = 0; i < wide.length(); ++i)
+ {
+ char c = ctype_c.narrow(wide[i], dfault);
+ VERIFY( c == narrow[i] );
+ }
+
+ // narrow(const charT* low, const charT* high, char dfault, char* dest) const
+ ctype_c.narrow(&wide[0], &wide[wide.length()], dfault, &narrow_chars[0]);
+ VERIFY( narrow_chars[0] != dfault );
+ for (int i = 0; i < wide.length(); ++i)
+ VERIFY( narrow_chars[i] == narrow[i] );
+}
+
+void test02()
+{
+ using namespace std;
+ typedef char wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ // Construct non-asci string.
+ basic_string<wide_type> wide("wibble");
+ wide += wide_type(1240);
+ wide += "kibble";
+ basic_string<char> narrow("wibble");
+ narrow += char(1240);
+ narrow += "kibble";
+ vector<char> narrow_chars(wide.length() + 1);
+
+ // narrow(charT c, char dfault) const
+ for (int i = 0; i < wide.length(); ++i)
+ {
+ char c = ctype_c.narrow(wide[i], dfault);
+ VERIFY( c == narrow[i] );
+ }
+
+ // narrow(const charT* low, const charT* high, char dfault, char* dest) const
+ ctype_c.narrow(&wide[0], &wide[wide.length()], dfault, &narrow_chars[0]);
+ VERIFY( narrow_chars[0] != dfault );
+ for (int i = 0; i < wide.length(); ++i)
+ VERIFY( narrow_chars[i] == narrow[i] );
+}
+
+int main()
+{
+ test01();
+ test02();
+ return 0;
+}
--- /dev/null
+// 2002-05-24 bkoz
+
+// Copyright (C) 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+// libstdc++/6701
+void test01()
+{
+ using namespace std;
+ typedef wchar_t wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ basic_string<wide_type> wide(L"wibble");
+ basic_string<char> narrow("wibble");
+ vector<char> narrow_chars(wide.length() + 1);
+
+ // narrow(charT c, char dfault) const
+ for (int i = 0; i < wide.length(); ++i)
+ {
+ char c = ctype_c.narrow(wide[i], dfault);
+ VERIFY( c == narrow[i] );
+ }
+
+ // narrow(const charT* low, const charT* high, char dfault, char* dest) const
+ ctype_c.narrow(&wide[0], &wide[wide.length()], dfault, &narrow_chars[0]);
+ VERIFY( narrow_chars[0] != dfault );
+ for (int i = 0; i < wide.length(); ++i)
+ VERIFY( narrow_chars[i] == narrow[i] );
+}
+
+void test02()
+{
+ using namespace std;
+ typedef wchar_t wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ // Construct non-asci string.
+ basic_string<wide_type> wide(L"wibble");
+ wide += wide_type(1240);
+ wide += L"kibble";
+ basic_string<char> narrow("wibble");
+ narrow += dfault;
+ narrow += "kibble";
+ vector<char> narrow_chars(wide.length() + 1);
+
+ // narrow(charT c, char dfault) const
+ for (int i = 0; i < wide.length(); ++i)
+ {
+ char c = ctype_c.narrow(wide[i], dfault);
+ VERIFY( c == narrow[i] );
+ }
+
+ // narrow(const charT* low, const charT* high, char dfault, char* dest) const
+ ctype_c.narrow(&wide[0], &wide[wide.length()], dfault, &narrow_chars[0]);
+ VERIFY( narrow_chars[0] != dfault );
+ for (int i = 0; i < wide.length(); ++i)
+ VERIFY( narrow_chars[i] == narrow[i] );
+}
+
+int main()
+{
+ test01();
+ test02();
+ return 0;
+}
--- /dev/null
+// Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <testsuite_hooks.h>
+
+typedef char char_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+void test01()
+{
+ bool test = true;
+ const char_type strlit00[] = "manilla, cebu, tandag PHILIPPINES";
+ const char_type strlit01[] = "MANILLA, CEBU, TANDAG PHILIPPINES";
+ const char_type strlit02[] = "manilla, cebu, tandag philippines";
+ const char_type c00 = 'S';
+ const char_type c10 = 's';
+ const char_type c20 = '9';
+ const char_type c30 = ' ';
+ const char_type c40 = '!';
+ const char_type c50 = 'F';
+ const char_type c60 = 'f';
+ const char_type c70 = 'X';
+ const char_type c80 = 'x';
+
+ gnu_ctype gctype;
+ char_type c100;
+ int len = std::char_traits<char_type>::length(strlit00);
+ char_type c_array[len + 1];
+
+ // sanity check ctype_base::mask members
+ int i01 = std::ctype_base::space;
+ int i02 = std::ctype_base::upper;
+ int i03 = std::ctype_base::lower;
+ int i04 = std::ctype_base::digit;
+ int i05 = std::ctype_base::punct;
+ int i06 = std::ctype_base::alpha;
+ int i07 = std::ctype_base::xdigit;
+ int i08 = std::ctype_base::alnum;
+ int i09 = std::ctype_base::graph;
+ int i10 = std::ctype_base::print;
+ int i11 = std::ctype_base::cntrl;
+ int i12 = sizeof(std::ctype_base::mask);
+ VERIFY ( i01 != i02);
+ VERIFY ( i02 != i03);
+ VERIFY ( i03 != i04);
+ VERIFY ( i04 != i05);
+ VERIFY ( i05 != i06);
+ VERIFY ( i06 != i07);
+ VERIFY ( i07 != i08);
+ VERIFY ( i08 != i09);
+ VERIFY ( i09 != i10);
+ VERIFY ( i10 != i11);
+ VERIFY ( i11 != i01);
+
+ // char_type toupper(char_type c) const
+ c100 = gctype.toupper(c10);
+ VERIFY( c100 == c00 );
+
+ // char_type tolower(char_type c) const
+ c100 = gctype.tolower(c00);
+ VERIFY( c100 == c10 );
+
+ // char_type toupper(char_type* low, const char_type* hi) const
+ std::char_traits<char_type>::copy(c_array, strlit02, len + 1);
+ gctype.toupper(c_array, c_array + len);
+ VERIFY( !std::char_traits<char_type>::compare(c_array, strlit01, len - 1) );
+
+ // char_type tolower(char_type* low, const char_type* hi) const
+ std::char_traits<char_type>::copy(c_array, strlit01, len + 1);
+ gctype.tolower(c_array, c_array + len);
+ VERIFY( !std::char_traits<char_type>::compare(c_array, strlit02, len - 1) );
+}
+
+// libstdc++/5280
+void test04()
+{
+#ifdef _GLIBCPP_HAVE_SETENV
+ // Set the global locale to non-"C".
+ std::locale loc_de("de_DE");
+ std::locale::global(loc_de);
+
+ // Set LANG environment variable to de_DE.
+ const char* oldLANG = getenv("LANG");
+ if (!setenv("LANG", "de_DE", 1))
+ {
+ test01();
+ setenv("LANG", oldLANG ? oldLANG : "", 1);
+ }
+#endif
+}
+
+// http://gcc.gnu.org/ml/libstdc++/2002-05/msg00038.html
+void test05()
+{
+ bool test = true;
+
+ const char* tentLANG = setlocale(LC_ALL, "ja_JP.eucjp");
+ if (tentLANG != NULL)
+ {
+ std::string preLANG = tentLANG;
+ test01();
+ std::string postLANG = setlocale(LC_ALL, NULL);
+ VERIFY( preLANG == postLANG );
+ }
+}
+
+int main()
+{
+ test01();
+ test04();
+ test05();
+ return 0;
+}
--- /dev/null
+// Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <testsuite_hooks.h>
+
+typedef wchar_t char_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+void test01()
+{
+ bool test = true;
+ const char_type strlit00[] = L"manilla, cebu, tandag PHILIPPINES";
+ const char_type strlit01[] = L"MANILLA, CEBU, TANDAG PHILIPPINES";
+ const char_type strlit02[] = L"manilla, cebu, tandag philippines";
+ const char_type c00 = L'S';
+ const char_type c10 = L's';
+ const char_type c20 = L'9';
+ const char_type c30 = L' ';
+ const char_type c40 = L'!';
+ const char_type c50 = L'F';
+ const char_type c60 = L'f';
+ const char_type c70 = L'X';
+ const char_type c80 = L'x';
+
+ gnu_ctype gctype;
+ char_type c100;
+ int len = std::char_traits<char_type>::length(strlit00);
+ char_type c_array[len + 1];
+
+ // sanity check ctype_base::mask members
+ int i01 = std::ctype_base::space;
+ int i02 = std::ctype_base::upper;
+ int i03 = std::ctype_base::lower;
+ int i04 = std::ctype_base::digit;
+ int i05 = std::ctype_base::punct;
+ int i06 = std::ctype_base::alpha;
+ int i07 = std::ctype_base::xdigit;
+ int i08 = std::ctype_base::alnum;
+ int i09 = std::ctype_base::graph;
+ int i10 = std::ctype_base::print;
+ int i11 = std::ctype_base::cntrl;
+ int i12 = sizeof(std::ctype_base::mask);
+ VERIFY ( i01 != i02);
+ VERIFY ( i02 != i03);
+ VERIFY ( i03 != i04);
+ VERIFY ( i04 != i05);
+ VERIFY ( i05 != i06);
+ VERIFY ( i06 != i07);
+ VERIFY ( i07 != i08);
+ VERIFY ( i08 != i09);
+ VERIFY ( i09 != i10);
+ VERIFY ( i10 != i11);
+ VERIFY ( i11 != i01);
+
+ // char_type toupper(char_type c) const
+ c100 = gctype.toupper(c10);
+ VERIFY( c100 == c00 );
+
+ // char_type tolower(char_type c) const
+ c100 = gctype.tolower(c00);
+ VERIFY( c100 == c10 );
+
+ // char_type toupper(char_type* low, const char_type* hi) const
+ std::char_traits<char_type>::copy(c_array, strlit02, len + 1);
+ gctype.toupper(c_array, c_array + len);
+ VERIFY( !std::char_traits<char_type>::compare(c_array, strlit01, len - 1) );
+
+ // char_type tolower(char_type* low, const char_type* hi) const
+ std::char_traits<char_type>::copy(c_array, strlit01, len + 1);
+ gctype.tolower(c_array, c_array + len);
+ VERIFY( !std::char_traits<char_type>::compare(c_array, strlit02, len - 1) );
+}
+
+// libstdc++/5280
+void test04()
+{
+#ifdef _GLIBCPP_HAVE_SETENV
+ // Set the global locale to non-"C".
+ std::locale loc_de("de_DE");
+ std::locale::global(loc_de);
+
+ // Set LANG environment variable to de_DE.
+ const char* oldLANG = getenv("LANG");
+ if (!setenv("LANG", "de_DE", 1))
+ {
+ test01();
+ setenv("LANG", oldLANG ? oldLANG : "", 1);
+ }
+#endif
+}
+
+// http://gcc.gnu.org/ml/libstdc++/2002-05/msg00038.html
+void test05()
+{
+ bool test = true;
+
+ const char* tentLANG = setlocale(LC_ALL, "ja_JP.eucjp");
+ if (tentLANG != NULL)
+ {
+ std::string preLANG = tentLANG;
+ test01();
+ std::string postLANG = setlocale(LC_ALL, NULL);
+ VERIFY( preLANG == postLANG );
+ }
+}
+
+int main()
+{
+ test01();
+ test04();
+ test05();
+ return 0;
+}
--- /dev/null
+// 2002-05-24 bkoz
+
+// Copyright (C) 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+void test01()
+{
+ using namespace std;
+ typedef char wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ basic_string<wide_type> wide("drusilla, louvinia, bayard");
+ basic_string<char> narrow("drusilla, louvinia, bayard");
+ vector<wide_type> wide_chars(narrow.length() + 1);
+
+ // widen(char c) const
+ for (int i = 0; i < narrow.length(); ++i)
+ {
+ char c = ctype_c.widen(narrow[i]);
+ VERIFY( c == wide[i] );
+ }
+
+ // widen(const char* low, const char* high, charT* dest) const
+ ctype_c.widen(&narrow[0], &narrow[narrow.length()], &wide_chars[0]);
+ for (int i = 0; i < narrow.length(); ++i)
+ VERIFY( wide_chars[i] == wide[i] );
+}
+
+int main()
+{
+ test01();
+ return 0;
+}
--- /dev/null
+// 2002-05-24 bkoz
+
+// Copyright (C) 2002 Free Software Foundation, Inc.
+//
+// This file is part of the GNU ISO C++ Library. This library 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 2, or (at your option)
+// any later version.
+
+// This 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 General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING. If not, write to the Free
+// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
+// USA.
+
+// As a special exception, you may use this file as part of a free software
+// library without restriction. Specifically, if other files instantiate
+// templates or use macros or inline functions from this file, or you compile
+// this file and link it with other files to produce an executable, this
+// file does not by itself cause the resulting executable to be covered by
+// the GNU General Public License. This exception does not however
+// invalidate any other reasons why the executable file might be covered by
+// the GNU General Public License.
+
+// 22.2.1.3.2 ctype<char> members
+
+#include <locale>
+#include <vector>
+#include <testsuite_hooks.h>
+
+void test01()
+{
+ using namespace std;
+ typedef wchar_t wide_type;
+
+ bool test = true;
+ const char dfault = '?';
+ const locale loc_c = locale::classic();
+ const ctype<wide_type>& ctype_c = use_facet<ctype<wide_type> >(loc_c);
+
+ basic_string<wide_type> wide(L"drusilla, louvinia, bayard");
+ basic_string<char> narrow("drusilla, louvinia, bayard");
+ vector<wide_type> wide_chars(narrow.length() + 1);
+
+ // widen(char c) const
+ for (int i = 0; i < narrow.length(); ++i)
+ {
+ char c = ctype_c.widen(narrow[i]);
+ VERIFY( c == wide[i] );
+ }
+
+ // widen(const char* low, const char* high, charT* dest) const
+ ctype_c.widen(&narrow[0], &narrow[narrow.length()], &wide_chars[0]);
+ for (int i = 0; i < narrow.length(); ++i)
+ VERIFY( wide_chars[i] == wide[i] );
+}
+
+int main()
+{
+ test01();
+ return 0;
+}