| // 2002-05-10 ghazi |
| |
| // 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, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, |
| // 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. |
| |
| // { 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)) |
| |
| #ifdef _GLIBCXX_USE_WCHAR_T |
| // 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); |
| } |
| #endif |
| |
| int main() |
| { |
| #ifdef _GLIBCXX_USE_WCHAR_T |
| test01(); |
| #endif |
| return 0; |
| } |