summaryrefslogtreecommitdiff
path: root/libstdc++-v3/testsuite/22_locale/ctype/scan
diff options
context:
space:
mode:
Diffstat (limited to 'libstdc++-v3/testsuite/22_locale/ctype/scan')
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/char/1.cc339
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_env.cc37
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_locale.cc37
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/1.cc339
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_env.cc37
-rw-r--r--libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_locale.cc37
6 files changed, 826 insertions, 0 deletions
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/char/1.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/1.cc
new file mode 100644
index 000000000..f43123471
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/1.cc
@@ -0,0 +1,339 @@
+// 2002-05-10 ghazi
+
+// Copyright (C) 2002, 2009 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+
+// { dg-do run }
+
+#include <locale>
+#include <testsuite_hooks.h>
+
+typedef char char_type;
+typedef std::char_traits<char_type> traits_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+// These two macros take a ctype mask, a string and a pointer within
+// the string that the scan function should return, usually either the
+// first or last character if the string contains identical values as
+// below.
+#define VERIFY_SCAN_IS(MASK, STRING, EXPECTED) \
+ VERIFY(gctype.scan_is((MASK), (STRING), \
+ (STRING) + traits_type::length(STRING)) == (EXPECTED))
+#define VERIFY_SCAN_NOT(MASK, STRING, EXPECTED) \
+ VERIFY(gctype.scan_not((MASK), (STRING), \
+ (STRING) + traits_type::length(STRING)) == (EXPECTED))
+
+// Sanity check scan_is() and scan_not().
+void test01()
+{
+ bool test __attribute__((unused)) = true;
+
+ const char_type *const ca = "aaaaa";
+ const char_type *const cz = "zzzzz";
+ const char_type *const cA = "AAAAA";
+ const char_type *const cZ = "ZZZZZ";
+ const char_type *const c0 = "00000";
+ const char_type *const c9 = "99999";
+ const char_type *const cs = " ";
+ const char_type *const xf = "fffff";
+ const char_type *const xF = "FFFFF";
+ const char_type *const p1 = "!!!!!";
+ const char_type *const p2 = "/////";
+
+ gnu_ctype gctype;
+
+ // 'a'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::lower, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::print, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::punct, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, ca, ca);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::space, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, ca, ca+5);
+
+ // 'z'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::print, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cz, cz+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cz, cz);
+
+ // 'A'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cA, cA);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cA, cA+5);
+
+ // 'Z'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cZ, cZ+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cZ, cZ);
+
+ // '0'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::graph, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::lower, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::punct, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, c0, c0);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::print, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::space, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, c0, c0+5);
+
+ // '9'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::graph, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::lower, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::punct, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, c9, c9);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::print, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::space, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, c9, c9+5);
+
+ // ' '
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cs, cs);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cs, cs);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cs, cs+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cs, cs+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cs, cs+5);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cs, cs);
+
+ // 'f'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::lower, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::print, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::punct, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, xf, xf);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::space, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, xf, xf+5);
+
+ // 'F'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::lower, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::punct, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, xF, xF);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::print, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::space, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, xF, xF+5);
+
+ // '!'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::lower, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::punct, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::space, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, p1, p1+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::print, p1, p1+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, p1, p1+5);
+ VERIFY_SCAN_NOT (std::ctype_base::space, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, p1, p1);
+
+ // '/'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::lower, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::punct, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::space, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, p2, p2+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::print, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::space, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, p2, p2);
+}
+
+int main()
+{
+ test01();
+ return 0;
+}
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_env.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_env.cc
new file mode 100644
index 000000000..f8f6daa9e
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_env.cc
@@ -0,0 +1,37 @@
+// { dg-require-namedlocale "de_DE" }
+
+// 2001-08-15 Benjamin Kosnik <bkoz@redhat.com>
+
+// Copyright (C) 2001, 2002, 2003, 2005, 2009 Free Software Foundation
+//
+// 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+// 22.2.4.1.1 collate members
+
+#include <testsuite_hooks.h>
+
+#define main discard_main_1
+#include "1.cc"
+#undef main
+
+int main()
+{
+ using namespace __gnu_test;
+ func_callback two;
+ two.push_back(&test01);
+ run_tests_wrapped_env("de_DE", "LANG", two);
+ return 0;
+}
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_locale.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_locale.cc
new file mode 100644
index 000000000..ac0fccc32
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/char/wrapped_locale.cc
@@ -0,0 +1,37 @@
+// { dg-require-namedlocale "ja_JP.eucjp" }
+
+// 2001-08-15 Benjamin Kosnik <bkoz@redhat.com>
+
+// Copyright (C) 2001, 2002, 2003, 2005, 2009 Free Software Foundation
+//
+// 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+// 22.2.4.1.1 collate members
+
+#include <testsuite_hooks.h>
+
+#define main discard_main_1
+#include "1.cc"
+#undef main
+
+int main()
+{
+ using namespace __gnu_test;
+ func_callback two;
+ two.push_back(&test01);
+ run_tests_wrapped_locale("ja_JP.eucjp", two);
+ return 0;
+}
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/1.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/1.cc
new file mode 100644
index 000000000..abd8ea3ad
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/1.cc
@@ -0,0 +1,339 @@
+// 2002-05-10 ghazi
+
+// Copyright (C) 2002, 2007, 2009 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+
+// { dg-do run }
+
+#include <locale>
+#include <testsuite_hooks.h>
+
+typedef wchar_t char_type;
+typedef std::char_traits<char_type> traits_type;
+class gnu_ctype: public std::ctype<char_type> { };
+
+// These two macros take a ctype mask, a string and a pointer within
+// the string that the scan function should return, usually either the
+// first or last character if the string contains identical values as
+// below.
+#define VERIFY_SCAN_IS(MASK, STRING, EXPECTED) \
+ VERIFY(gctype.scan_is((MASK), (STRING), \
+ (STRING) + traits_type::length(STRING)) == (EXPECTED))
+#define VERIFY_SCAN_NOT(MASK, STRING, EXPECTED) \
+ VERIFY(gctype.scan_not((MASK), (STRING), \
+ (STRING) + traits_type::length(STRING)) == (EXPECTED))
+
+// Sanity check scan_is() and scan_not().
+void test01()
+{
+ bool test __attribute__((unused)) = true;
+
+ const char_type *const ca = L"aaaaa";
+ const char_type *const cz = L"zzzzz";
+ const char_type *const cA = L"AAAAA";
+ const char_type *const cZ = L"ZZZZZ";
+ const char_type *const c0 = L"00000";
+ const char_type *const c9 = L"99999";
+ const char_type *const cs = L" ";
+ const char_type *const xf = L"fffff";
+ const char_type *const xF = L"FFFFF";
+ const char_type *const p1 = L"!!!!!";
+ const char_type *const p2 = L"/////";
+
+ gnu_ctype gctype;
+
+ // 'a'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::lower, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::print, ca, ca);
+ VERIFY_SCAN_IS (std::ctype_base::punct, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, ca, ca+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, ca, ca);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, ca, ca+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::space, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, ca, ca);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, ca, ca+5);
+
+ // 'z'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::print, cz, cz);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cz, cz+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cz, cz+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cz, cz+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cz, cz);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cz, cz);
+
+ // 'A'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cA, cA+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cA, cA);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cA, cA);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cA, cA);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cA, cA+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cA, cA+5);
+
+ // 'Z'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cZ, cZ+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cZ, cZ);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cZ, cZ+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cZ, cZ);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cZ, cZ+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cZ, cZ);
+
+ // '0'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::graph, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::lower, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, c0, c0);
+ VERIFY_SCAN_IS (std::ctype_base::punct, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, c0, c0+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, c0, c0);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::print, c0, c0+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::space, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, c0, c0);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, c0, c0+5);
+
+ // '9'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::graph, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::lower, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, c9, c9);
+ VERIFY_SCAN_IS (std::ctype_base::punct, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, c9, c9+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, c9, c9);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::print, c9, c9+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::space, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, c9, c9);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, c9, c9+5);
+
+ // ' '
+ VERIFY_SCAN_IS (std::ctype_base::alnum, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::lower, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, cs, cs);
+ VERIFY_SCAN_IS (std::ctype_base::punct, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, cs, cs);
+ VERIFY_SCAN_IS (std::ctype_base::upper, cs, cs+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, cs, cs+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::print, cs, cs+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::space, cs, cs+5);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, cs, cs);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, cs, cs);
+
+ // 'f'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::lower, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::print, xf, xf);
+ VERIFY_SCAN_IS (std::ctype_base::punct, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, xf, xf+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, xf, xf);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::print, xf, xf+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::space, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, xf, xf);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, xf, xf+5);
+
+ // 'F'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::lower, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::punct, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::space, xF, xF+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, xF, xF);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, xF, xF);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::print, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::space, xF, xF);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, xF, xF+5);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, xF, xF+5);
+
+ // '!'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::lower, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::punct, p1, p1);
+ VERIFY_SCAN_IS (std::ctype_base::space, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, p1, p1+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, p1, p1+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::print, p1, p1+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, p1, p1+5);
+ VERIFY_SCAN_NOT (std::ctype_base::space, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, p1, p1);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, p1, p1);
+
+ // '/'
+ VERIFY_SCAN_IS (std::ctype_base::alnum, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::alpha, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::cntrl, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::digit, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::graph, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::lower, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::print, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::punct, p2, p2);
+ VERIFY_SCAN_IS (std::ctype_base::space, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::upper, p2, p2+5);
+ VERIFY_SCAN_IS (std::ctype_base::xdigit, p2, p2+5);
+
+ VERIFY_SCAN_NOT (std::ctype_base::alnum, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::alpha, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::cntrl, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::digit, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::graph, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::lower, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::print, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::punct, p2, p2+5);
+ VERIFY_SCAN_NOT (std::ctype_base::space, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::upper, p2, p2);
+ VERIFY_SCAN_NOT (std::ctype_base::xdigit, p2, p2);
+}
+
+int main()
+{
+ test01();
+ return 0;
+}
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_env.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_env.cc
new file mode 100644
index 000000000..f8f6daa9e
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_env.cc
@@ -0,0 +1,37 @@
+// { dg-require-namedlocale "de_DE" }
+
+// 2001-08-15 Benjamin Kosnik <bkoz@redhat.com>
+
+// Copyright (C) 2001, 2002, 2003, 2005, 2009 Free Software Foundation
+//
+// 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+// 22.2.4.1.1 collate members
+
+#include <testsuite_hooks.h>
+
+#define main discard_main_1
+#include "1.cc"
+#undef main
+
+int main()
+{
+ using namespace __gnu_test;
+ func_callback two;
+ two.push_back(&test01);
+ run_tests_wrapped_env("de_DE", "LANG", two);
+ return 0;
+}
diff --git a/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_locale.cc b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_locale.cc
new file mode 100644
index 000000000..ac0fccc32
--- /dev/null
+++ b/libstdc++-v3/testsuite/22_locale/ctype/scan/wchar_t/wrapped_locale.cc
@@ -0,0 +1,37 @@
+// { dg-require-namedlocale "ja_JP.eucjp" }
+
+// 2001-08-15 Benjamin Kosnik <bkoz@redhat.com>
+
+// Copyright (C) 2001, 2002, 2003, 2005, 2009 Free Software Foundation
+//
+// 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 3, 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 COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+// 22.2.4.1.1 collate members
+
+#include <testsuite_hooks.h>
+
+#define main discard_main_1
+#include "1.cc"
+#undef main
+
+int main()
+{
+ using namespace __gnu_test;
+ func_callback two;
+ two.push_back(&test01);
+ run_tests_wrapped_locale("ja_JP.eucjp", two);
+ return 0;
+}