Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
algorithmfwd.h	21.23 KB	-rw-r--r--	2025-03-31 10:36
alloc_traits.h	19.6 KB	-rw-r--r--	2025-03-31 10:36
allocated_ptr.h	3.22 KB	-rw-r--r--	2025-03-31 10:36
allocator.h	7.39 KB	-rw-r--r--	2025-03-31 10:36
atomic_base.h	23.28 KB	-rw-r--r--	2025-03-31 10:36
atomic_futex.h	9.35 KB	-rw-r--r--	2025-03-31 10:36
atomic_lockfree_defines.h	2.2 KB	-rw-r--r--	2025-03-31 10:36
basic_ios.h	15.7 KB	-rw-r--r--	2025-03-31 10:36
basic_ios.tcc	5.94 KB	-rw-r--r--	2025-03-31 10:36
basic_string.h	237.01 KB	-rw-r--r--	2025-03-31 10:36
basic_string.tcc	52.5 KB	-rw-r--r--	2025-03-31 10:36
boost_concept_check.h	26.52 KB	-rw-r--r--	2025-03-31 10:36
c++0x_warning.h	1.44 KB	-rw-r--r--	2025-03-31 10:36
char_traits.h	20.42 KB	-rw-r--r--	2025-03-31 10:36
codecvt.h	20.79 KB	-rw-r--r--	2025-03-31 10:36
concept_check.h	3.34 KB	-rw-r--r--	2025-03-31 10:36
cpp_type_traits.h	9.56 KB	-rw-r--r--	2025-03-31 10:36
cxxabi_forced.h	1.77 KB	-rw-r--r--	2025-03-31 10:36
cxxabi_init_exception.h	2.17 KB	-rw-r--r--	2025-03-31 10:36
deque.tcc	33.32 KB	-rw-r--r--	2025-03-31 10:36
enable_special_members.h	12.1 KB	-rw-r--r--	2025-03-31 10:36
exception.h	2.23 KB	-rw-r--r--	2025-03-31 10:36
exception_defines.h	1.61 KB	-rw-r--r--	2025-03-31 10:36
exception_ptr.h	5.84 KB	-rw-r--r--	2025-03-31 10:36
forward_list.h	47.77 KB	-rw-r--r--	2025-03-31 10:36
forward_list.tcc	12.86 KB	-rw-r--r--	2025-03-31 10:36
fs_dir.h	14.38 KB	-rw-r--r--	2025-03-31 10:36
fs_fwd.h	10.04 KB	-rw-r--r--	2025-03-31 10:36
fs_ops.h	9.5 KB	-rw-r--r--	2025-03-31 10:36
fs_path.h	32.12 KB	-rw-r--r--	2025-03-31 10:36
fstream.tcc	32.03 KB	-rw-r--r--	2025-03-31 10:36
functexcept.h	3.18 KB	-rw-r--r--	2025-03-31 10:36
functional_hash.h	8.04 KB	-rw-r--r--	2025-03-31 10:36
gslice.h	5.39 KB	-rw-r--r--	2025-03-31 10:36
gslice_array.h	7.59 KB	-rw-r--r--	2025-03-31 10:36
hash_bytes.h	2.1 KB	-rw-r--r--	2025-03-31 10:36
hashtable.h	72.06 KB	-rw-r--r--	2025-03-31 10:36
hashtable_policy.h	66.38 KB	-rw-r--r--	2025-03-31 10:36
indirect_array.h	7.68 KB	-rw-r--r--	2025-03-31 10:36
invoke.h	3.57 KB	-rw-r--r--	2025-03-31 10:36
ios_base.h	30.3 KB	-rw-r--r--	2025-03-31 10:36
istream.tcc	30.36 KB	-rw-r--r--	2025-03-31 10:36
list.tcc	15.6 KB	-rw-r--r--	2025-03-31 10:36
locale_classes.h	24.31 KB	-rw-r--r--	2025-03-31 10:36
locale_classes.tcc	8.18 KB	-rw-r--r--	2025-03-31 10:36
locale_conv.h	15.72 KB	-rw-r--r--	2025-03-31 10:36
locale_facets.h	90.16 KB	-rw-r--r--	2025-03-31 10:36
locale_facets.tcc	38.62 KB	-rw-r--r--	2025-03-31 10:36
locale_facets_nonio.h	67.36 KB	-rw-r--r--	2025-03-31 10:36
locale_facets_nonio.tcc	44.22 KB	-rw-r--r--	2025-03-31 10:36
localefwd.h	5.51 KB	-rw-r--r--	2025-03-31 10:36
mask_array.h	7.42 KB	-rw-r--r--	2025-03-31 10:36
memoryfwd.h	2.4 KB	-rw-r--r--	2025-03-31 10:36
move.h	6.38 KB	-rw-r--r--	2025-03-31 10:36
nested_exception.h	4.69 KB	-rw-r--r--	2025-03-31 10:36
node_handle.h	8.02 KB	-rw-r--r--	2025-03-31 10:36
ostream.tcc	12.03 KB	-rw-r--r--	2025-03-31 10:36
ostream_insert.h	3.91 KB	-rw-r--r--	2025-03-31 10:36
parse_numbers.h	7.76 KB	-rw-r--r--	2025-03-31 10:36
postypes.h	8.02 KB	-rw-r--r--	2025-03-31 10:36
predefined_ops.h	8.87 KB	-rw-r--r--	2025-03-31 10:36
ptr_traits.h	6.47 KB	-rw-r--r--	2025-03-31 10:36
quoted_string.h	4.93 KB	-rw-r--r--	2025-03-31 10:36
random.h	171.14 KB	-rw-r--r--	2025-03-31 10:36
random.tcc	103.12 KB	-rw-r--r--	2025-03-31 10:36
range_access.h	9.79 KB	-rw-r--r--	2025-03-31 10:36
refwrap.h	11.61 KB	-rw-r--r--	2025-03-31 10:36
regex.h	95.12 KB	-rw-r--r--	2025-03-31 10:36
regex.tcc	16.18 KB	-rw-r--r--	2025-03-31 10:36
regex_automaton.h	10.47 KB	-rw-r--r--	2025-03-31 10:36
regex_automaton.tcc	7.65 KB	-rw-r--r--	2025-03-31 10:36
regex_compiler.h	17.63 KB	-rw-r--r--	2025-03-31 10:36
regex_compiler.tcc	18.84 KB	-rw-r--r--	2025-03-31 10:36
regex_constants.h	14.36 KB	-rw-r--r--	2025-03-31 10:36
regex_error.h	4.79 KB	-rw-r--r--	2025-03-31 10:36
regex_executor.h	7.31 KB	-rw-r--r--	2025-03-31 10:36
regex_executor.tcc	18.4 KB	-rw-r--r--	2025-03-31 10:36
regex_scanner.h	6.92 KB	-rw-r--r--	2025-03-31 10:36
regex_scanner.tcc	14.66 KB	-rw-r--r--	2025-03-31 10:36
shared_ptr.h	22.88 KB	-rw-r--r--	2025-03-31 10:36
shared_ptr_atomic.h	9.54 KB	-rw-r--r--	2025-03-31 10:36
shared_ptr_base.h	53.01 KB	-rw-r--r--	2025-03-31 10:36
slice_array.h	9.13 KB	-rw-r--r--	2025-03-31 10:36
specfun.h	45.95 KB	-rw-r--r--	2025-03-31 10:36
sstream.tcc	9.9 KB	-rw-r--r--	2025-03-31 10:36
std_abs.h	3.19 KB	-rw-r--r--	2025-03-31 10:36
std_function.h	22.71 KB	-rw-r--r--	2025-03-31 10:36
std_mutex.h	9.08 KB	-rw-r--r--	2025-03-31 10:36
stl_algo.h	209.27 KB	-rw-r--r--	2025-03-31 10:36
stl_algobase.h	49.31 KB	-rw-r--r--	2025-03-31 10:36
stl_bvector.h	32.94 KB	-rw-r--r--	2025-03-31 10:36
stl_construct.h	7.22 KB	-rw-r--r--	2025-03-31 10:36
stl_deque.h	76.73 KB	-rw-r--r--	2025-03-31 10:36
stl_function.h	40.77 KB	-rw-r--r--	2025-03-31 10:36
stl_heap.h	19.73 KB	-rw-r--r--	2025-03-31 10:36
stl_iterator.h	41.3 KB	-rw-r--r--	2025-03-31 10:36
stl_iterator_base_funcs.h	7.99 KB	-rw-r--r--	2025-03-31 10:36
stl_iterator_base_types.h	8.48 KB	-rw-r--r--	2025-03-31 10:36
stl_list.h	65.97 KB	-rw-r--r--	2025-03-31 10:36
stl_map.h	51.55 KB	-rw-r--r--	2025-03-31 10:36
stl_multimap.h	40.58 KB	-rw-r--r--	2025-03-31 10:36
stl_multiset.h	34.97 KB	-rw-r--r--	2025-03-31 10:36
stl_numeric.h	13.51 KB	-rw-r--r--	2025-03-31 10:36
stl_pair.h	18.21 KB	-rw-r--r--	2025-03-31 10:36
stl_queue.h	23.51 KB	-rw-r--r--	2025-03-31 10:36
stl_raw_storage_iter.h	3.74 KB	-rw-r--r--	2025-03-31 10:36
stl_relops.h	4.49 KB	-rw-r--r--	2025-03-31 10:36
stl_set.h	35.28 KB	-rw-r--r--	2025-03-31 10:36
stl_stack.h	11.66 KB	-rw-r--r--	2025-03-31 10:36
stl_tempbuf.h	8.15 KB	-rw-r--r--	2025-03-31 10:36
stl_tree.h	73.15 KB	-rw-r--r--	2025-03-31 10:36
stl_uninitialized.h	27.06 KB	-rw-r--r--	2025-03-31 10:36
stl_vector.h	59.12 KB	-rw-r--r--	2025-03-31 10:36
stream_iterator.h	6.5 KB	-rw-r--r--	2025-03-31 10:36
streambuf.tcc	4.81 KB	-rw-r--r--	2025-03-31 10:36
streambuf_iterator.h	13.44 KB	-rw-r--r--	2025-03-31 10:36
string_view.tcc	6.54 KB	-rw-r--r--	2025-03-31 10:36
stringfwd.h	2.55 KB	-rw-r--r--	2025-03-31 10:36
uniform_int_dist.h	9.84 KB	-rw-r--r--	2025-03-31 10:36
unique_ptr.h	25.38 KB	-rw-r--r--	2025-03-31 10:36
unordered_map.h	73.58 KB	-rw-r--r--	2025-03-31 10:36
unordered_set.h	57.76 KB	-rw-r--r--	2025-03-31 10:36
uses_allocator.h	6.37 KB	-rw-r--r--	2025-03-31 10:36
valarray_after.h	22.12 KB	-rw-r--r--	2025-03-31 10:36
valarray_array.h	21.3 KB	-rw-r--r--	2025-03-31 10:36
valarray_array.tcc	7.08 KB	-rw-r--r--	2025-03-31 10:36
valarray_before.h	18.08 KB	-rw-r--r--	2025-03-31 10:36
vector.tcc	28.95 KB	-rw-r--r--	2025-03-31 10:36

Rename

// class template regex -*- C++ -*-

// Copyright (C) 2013-2018 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.

// Under Section 7 of GPL version 3, you are granted additional
// permissions described in the GCC Runtime Library Exception, version
// 3.1, as published by the Free Software Foundation.

// You should have received a copy of the GNU General Public License and
// a copy of the GCC Runtime Library Exception along with this program;
// see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
// <http://www.gnu.org/licenses/>.

/**
 *  @file bits/regex_scanner.tcc
 *  This is an internal header file, included by other library headers.
 *  Do not attempt to use it directly. @headername{regex}
 */

// FIXME make comments doxygen format.

// N3376 specified 6 regex styles: ECMAScript, basic, extended, grep, egrep
// and awk
// 1) grep is basic except '\n' is treated as '|'
// 2) egrep is extended except '\n' is treated as '|'
// 3) awk is extended except special escaping rules, and there's no
//    back-reference.
//
// References:
//
// ECMAScript: ECMA-262 15.10
//
// basic, extended:
// http://pubs.opengroup.org/onlinepubs/009695399/basedefs/xbd_chap09.html
//
// awk: http://pubs.opengroup.org/onlinepubs/000095399/utilities/awk.html

namespace std _GLIBCXX_VISIBILITY(default)
{
_GLIBCXX_BEGIN_NAMESPACE_VERSION

namespace __detail
{
  template<typename _CharT>
    _Scanner<_CharT>::
    _Scanner(typename _Scanner::_IterT __begin,
	     typename _Scanner::_IterT __end,
	     _FlagT __flags, std::locale __loc)
    : _ScannerBase(__flags),
      _M_current(__begin), _M_end(__end),
      _M_ctype(std::use_facet<_CtypeT>(__loc)),
      _M_eat_escape(_M_is_ecma()
		    ? &_Scanner::_M_eat_escape_ecma
		    : &_Scanner::_M_eat_escape_posix)
    { _M_advance(); }

template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_advance()
    {
      if (_M_current == _M_end)
	{
	  _M_token = _S_token_eof;
	  return;
	}

if (_M_state == _S_state_normal)
	_M_scan_normal();
      else if (_M_state == _S_state_in_bracket)
	_M_scan_in_bracket();
      else if (_M_state == _S_state_in_brace)
	_M_scan_in_brace();
      else
	{
	  __glibcxx_assert(false);
	}
    }

// Differences between styles:
  // 1) "\(", "\)", "\{" in basic. It's not escaping.
  // 2) "(?:", "(?=", "(?!" in ECMAScript.
  template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_scan_normal()
    {
      auto __c = *_M_current++;

if (std::strchr(_M_spec_char, _M_ctype.narrow(__c, ' ')) == nullptr)
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
	  return;
	}
      if (__c == '\\')
	{
	  if (_M_current == _M_end)
	    __throw_regex_error(
	      regex_constants::error_escape,
	      "Unexpected end of regex when escaping.");

if (!_M_is_basic()
	      || (*_M_current != '('
		  && *_M_current != ')'
		  && *_M_current != '{'))
	    {
	      (this->*_M_eat_escape)();
	      return;
	    }
	  __c = *_M_current++;
	}
      if (__c == '(')
	{
	  if (_M_is_ecma() && *_M_current == '?')
	    {
	      if (++_M_current == _M_end)
		__throw_regex_error(
		  regex_constants::error_paren,
		  "Unexpected end of regex when in an open parenthesis.");

if (*_M_current == ':')
		{
		  ++_M_current;
		  _M_token = _S_token_subexpr_no_group_begin;
		}
	      else if (*_M_current == '=')
		{
		  ++_M_current;
		  _M_token = _S_token_subexpr_lookahead_begin;
		  _M_value.assign(1, 'p');
		}
	      else if (*_M_current == '!')
		{
		  ++_M_current;
		  _M_token = _S_token_subexpr_lookahead_begin;
		  _M_value.assign(1, 'n');
		}
	      else
		__throw_regex_error(
		  regex_constants::error_paren,
		  "Invalid special open parenthesis.");
	    }
	  else if (_M_flags & regex_constants::nosubs)
	    _M_token = _S_token_subexpr_no_group_begin;
	  else
	    _M_token = _S_token_subexpr_begin;
	}
      else if (__c == ')')
	_M_token = _S_token_subexpr_end;
      else if (__c == '[')
	{
	  _M_state = _S_state_in_bracket;
	  _M_at_bracket_start = true;
	  if (_M_current != _M_end && *_M_current == '^')
	    {
	      _M_token = _S_token_bracket_neg_begin;
	      ++_M_current;
	    }
	  else
	    _M_token = _S_token_bracket_begin;
	}
      else if (__c == '{')
	{
	  _M_state = _S_state_in_brace;
	  _M_token = _S_token_interval_begin;
	}
      else if (__c != ']' && __c != '}')
	{
	  auto __it = _M_token_tbl;
	  auto __narrowc = _M_ctype.narrow(__c, '\0');
	  for (; __it->first != '\0'; ++__it)
	    if (__it->first == __narrowc)
	      {
		_M_token = __it->second;
		return;
	      }
	  __glibcxx_assert(false);
	}
      else
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
	}
    }

// Differences between styles:
  // 1) different semantics of "[]" and "[^]".
  // 2) Escaping in bracket expr.
  template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_scan_in_bracket()
    {
      if (_M_current == _M_end)
	__throw_regex_error(
	  regex_constants::error_brack,
	  "Unexpected end of regex when in bracket expression.");

auto __c = *_M_current++;

if (__c == '-')
	_M_token = _S_token_bracket_dash;
      else if (__c == '[')
	{
	  if (_M_current == _M_end)
	    __throw_regex_error(regex_constants::error_brack,
				"Unexpected character class open bracket.");

if (*_M_current == '.')
	    {
	      _M_token = _S_token_collsymbol;
	      _M_eat_class(*_M_current++);
	    }
	  else if (*_M_current == ':')
	    {
	      _M_token = _S_token_char_class_name;
	      _M_eat_class(*_M_current++);
	    }
	  else if (*_M_current == '=')
	    {
	      _M_token = _S_token_equiv_class_name;
	      _M_eat_class(*_M_current++);
	    }
	  else
	    {
	      _M_token = _S_token_ord_char;
	      _M_value.assign(1, __c);
	    }
	}
      // In POSIX, when encountering "[]" or "[^]", the ']' is interpreted
      // literally. So "[]]" and "[^]]" are valid regexes. See the testcases
      // `*/empty_range.cc`.
      else if (__c == ']' && (_M_is_ecma() || !_M_at_bracket_start))
	{
	  _M_token = _S_token_bracket_end;
	  _M_state = _S_state_normal;
	}
      // ECMAScript and awk permits escaping in bracket.
      else if (__c == '\\' && (_M_is_ecma() || _M_is_awk()))
	(this->*_M_eat_escape)();
      else
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
	}
      _M_at_bracket_start = false;
    }

// Differences between styles:
  // 1) "\}" in basic style.
  template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_scan_in_brace()
    {
      if (_M_current == _M_end)
	__throw_regex_error(
	  regex_constants::error_brace,
	  "Unexpected end of regex when in brace expression.");

auto __c = *_M_current++;

if (_M_ctype.is(_CtypeT::digit, __c))
	{
	  _M_token = _S_token_dup_count;
	  _M_value.assign(1, __c);
	  while (_M_current != _M_end
		 && _M_ctype.is(_CtypeT::digit, *_M_current))
	    _M_value += *_M_current++;
	}
      else if (__c == ',')
	_M_token = _S_token_comma;
      // basic use \}.
      else if (_M_is_basic())
	{
	  if (__c == '\\' && _M_current != _M_end && *_M_current == '}')
	    {
	      _M_state = _S_state_normal;
	      _M_token = _S_token_interval_end;
	      ++_M_current;
	    }
	  else
	    __throw_regex_error(regex_constants::error_badbrace,
				"Unexpected character in brace expression.");
	}
      else if (__c == '}')
	{
	  _M_state = _S_state_normal;
	  _M_token = _S_token_interval_end;
	}
      else
	__throw_regex_error(regex_constants::error_badbrace,
			    "Unexpected character in brace expression.");
    }

template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_eat_escape_ecma()
    {
      if (_M_current == _M_end)
	__throw_regex_error(regex_constants::error_escape,
			    "Unexpected end of regex when escaping.");

auto __c = *_M_current++;
      auto __pos = _M_find_escape(_M_ctype.narrow(__c, '\0'));

if (__pos != nullptr && (__c != 'b' || _M_state == _S_state_in_bracket))
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, *__pos);
	}
      else if (__c == 'b')
	{
	  _M_token = _S_token_word_bound;
	  _M_value.assign(1, 'p');
	}
      else if (__c == 'B')
	{
	  _M_token = _S_token_word_bound;
	  _M_value.assign(1, 'n');
	}
      // N3376 28.13
      else if (__c == 'd'
	       || __c == 'D'
	       || __c == 's'
	       || __c == 'S'
	       || __c == 'w'
	       || __c == 'W')
	{
	  _M_token = _S_token_quoted_class;
	  _M_value.assign(1, __c);
	}
      else if (__c == 'c')
	{
	  if (_M_current == _M_end)
	    __throw_regex_error(
	      regex_constants::error_escape,
	      "Unexpected end of regex when reading control code.");
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, *_M_current++);
	}
      else if (__c == 'x' || __c == 'u')
	{
	  _M_value.erase();
	  for (int __i = 0; __i < (__c == 'x' ? 2 : 4); __i++)
	    {
	      if (_M_current == _M_end
		  || !_M_ctype.is(_CtypeT::xdigit, *_M_current))
		__throw_regex_error(
		  regex_constants::error_escape,
		  "Unexpected end of regex when ascii character.");
	      _M_value += *_M_current++;
	    }
	  _M_token = _S_token_hex_num;
	}
      // ECMAScript recognizes multi-digit back-references.
      else if (_M_ctype.is(_CtypeT::digit, __c))
	{
	  _M_value.assign(1, __c);
	  while (_M_current != _M_end
		 && _M_ctype.is(_CtypeT::digit, *_M_current))
	    _M_value += *_M_current++;
	  _M_token = _S_token_backref;
	}
      else
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
	}
    }

// Differences between styles:
  // 1) Extended doesn't support backref, but basic does.
  template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_eat_escape_posix()
    {
      if (_M_current == _M_end)
	__throw_regex_error(regex_constants::error_escape,
			    "Unexpected end of regex when escaping.");

auto __c = *_M_current;
      auto __pos = std::strchr(_M_spec_char, _M_ctype.narrow(__c, '\0'));

if (__pos != nullptr && *__pos != '\0')
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
	}
      // We MUST judge awk before handling backrefs. There's no backref in awk.
      else if (_M_is_awk())
	{
	  _M_eat_escape_awk();
	  return;
	}
      else if (_M_is_basic() && _M_ctype.is(_CtypeT::digit, __c) && __c != '0')
	{
	  _M_token = _S_token_backref;
	  _M_value.assign(1, __c);
	}
      else
	{
#ifdef __STRICT_ANSI__
	  // POSIX says it is undefined to escape ordinary characters
	  __throw_regex_error(regex_constants::error_escape,
			      "Unexpected escape character.");
#else
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, __c);
#endif
	}
      ++_M_current;
    }

template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_eat_escape_awk()
    {
      auto __c = *_M_current++;
      auto __pos = _M_find_escape(_M_ctype.narrow(__c, '\0'));

if (__pos != nullptr)
	{
	  _M_token = _S_token_ord_char;
	  _M_value.assign(1, *__pos);
	}
      // \ddd for oct representation
      else if (_M_ctype.is(_CtypeT::digit, __c)
	       && __c != '8'
	       && __c != '9')
	{
	  _M_value.assign(1,  __c);
	  for (int __i = 0;
	       __i < 2
	       && _M_current != _M_end
	       && _M_ctype.is(_CtypeT::digit, *_M_current)
	       && *_M_current != '8'
	       && *_M_current != '9';
	       __i++)
	    _M_value += *_M_current++;
	  _M_token = _S_token_oct_num;
	  return;
	}
      else
	__throw_regex_error(regex_constants::error_escape,
			    "Unexpected escape character.");
    }

// Eats a character class or throws an exception.
  // __ch could be ':', '.' or '=', _M_current is the char after ']' when
  // returning.
  template<typename _CharT>
    void
    _Scanner<_CharT>::
    _M_eat_class(char __ch)
    {
      for (_M_value.clear(); _M_current != _M_end && *_M_current != __ch;)
	_M_value += *_M_current++;
      if (_M_current == _M_end
	  || *_M_current++ != __ch
	  || _M_current == _M_end // skip __ch
	  || *_M_current++ != ']') // skip ']'
	{
	  if (__ch == ':')
	    __throw_regex_error(regex_constants::error_ctype,
				"Unexpected end of character class.");
	  else
	    __throw_regex_error(regex_constants::error_collate,
				"Unexpected end of character class.");
	}
    }

#ifdef _GLIBCXX_DEBUG
  template<typename _CharT>
    std::ostream&
    _Scanner<_CharT>::
    _M_print(std::ostream& ostr)
    {
      switch (_M_token)
      {
      case _S_token_anychar:
	ostr << "any-character\n";
	break;
      case _S_token_backref:
	ostr << "backref\n";
	break;
      case _S_token_bracket_begin:
	ostr << "bracket-begin\n";
	break;
      case _S_token_bracket_neg_begin:
	ostr << "bracket-neg-begin\n";
	break;
      case _S_token_bracket_end:
	ostr << "bracket-end\n";
	break;
      case _S_token_char_class_name:
	ostr << "char-class-name \"" << _M_value << "\"\n";
	break;
      case _S_token_closure0:
	ostr << "closure0\n";
	break;
      case _S_token_closure1:
	ostr << "closure1\n";
	break;
      case _S_token_collsymbol:
	ostr << "collsymbol \"" << _M_value << "\"\n";
	break;
      case _S_token_comma:
	ostr << "comma\n";
	break;
      case _S_token_dup_count:
	ostr << "dup count: " << _M_value << "\n";
	break;
      case _S_token_eof:
	ostr << "EOF\n";
	break;
      case _S_token_equiv_class_name:
	ostr << "equiv-class-name \"" << _M_value << "\"\n";
	break;
      case _S_token_interval_begin:
	ostr << "interval begin\n";
	break;
      case _S_token_interval_end:
	ostr << "interval end\n";
	break;
      case _S_token_line_begin:
	ostr << "line begin\n";
	break;
      case _S_token_line_end:
	ostr << "line end\n";
	break;
      case _S_token_opt:
	ostr << "opt\n";
	break;
      case _S_token_or:
	ostr << "or\n";
	break;
      case _S_token_ord_char:
	ostr << "ordinary character: \"" << _M_value << "\"\n";
	break;
      case _S_token_subexpr_begin:
	ostr << "subexpr begin\n";
	break;
      case _S_token_subexpr_no_group_begin:
	ostr << "no grouping subexpr begin\n";
	break;
      case _S_token_subexpr_lookahead_begin:
	ostr << "lookahead subexpr begin\n";
	break;
      case _S_token_subexpr_end:
	ostr << "subexpr end\n";
	break;
      case _S_token_unknown:
	ostr << "-- unknown token --\n";
	break;
      case _S_token_oct_num:
	ostr << "oct number " << _M_value << "\n";
	break;
      case _S_token_hex_num:
	ostr << "hex number " << _M_value << "\n";
	break;
      case _S_token_quoted_class:
	ostr << "quoted class " << "\\" << _M_value << "\n";
	break;
      default:
	_GLIBCXX_DEBUG_ASSERT(false);
      }
      return ostr;
    }
#endif

} // namespace __detail
_GLIBCXX_END_NAMESPACE_VERSION
} // namespace