Imported gcc-4.4.3

[msp430-gcc.git] / libstdc++-v3 / testsuite / util / testsuite_character.cc

diff --git a/libstdc++-v3/testsuite/util/testsuite_character.cc b/libstdc++-v3/testsuite/util/testsuite_character.cc
new file mode 100644 (file)
index 0000000..dba37c9
--- /dev/null
+++ b/libstdc++-v3/testsuite/util/testsuite_character.cc
@@ -0,0 +1,186 @@
+// -*- C++ -*-
+
+// Utility subroutines for the C++ library testsuite. 
+//
+// Copyright (C) 2002, 2003, 2004, 2005, 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/>.
+//
+
+#include <testsuite_character.h>
+
+namespace std
+{
+  locale::id
+  codecvt<__gnu_test::pod_uchar, char, __gnu_test::pod_state>::id;
+
+  locale::id 
+  ctype<__gnu_test::pod_uchar>::id;
+
+  locale::id
+  numpunct<__gnu_test::pod_uint>::id;
+
+  locale::id
+  moneypunct<__gnu_test::pod_uint>::id;
+
+  // Member specializations for the existing facet classes.  
+  // NB: This isn't especially portable. Perhaps a better way would be
+  // to just specialize all of numpunct and ctype.
+  using __gnu_test::pod_ushort;
+  typedef pod_ushort::value_type value_type;
+
+  template<>
+    bool 
+    ctype<pod_ushort>::
+    do_is(mask, char_type) const { return true; }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_is(const char_type* __lo, const char_type*, mask*) const
+    { return __lo; }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_scan_is(mask, const char_type* __lo, const char_type*) const
+    { return __lo; }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_scan_not(mask, const char_type* __lo, const char_type*) const
+    { return __lo; }
+
+  template<>
+    pod_ushort 
+    ctype<pod_ushort>::
+    do_toupper(char_type __c) const
+    { return __c; }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_toupper(char_type*, const char_type* __hi) const
+    { return __hi; }
+
+  template<>
+    pod_ushort 
+    ctype<pod_ushort>::
+    do_tolower(char_type __c) const
+    { return __c; }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_tolower(char_type*, const char_type* __hi) const
+    { return __hi; }
+
+  template<>
+    pod_ushort
+    ctype<pod_ushort>::
+    do_widen(char __c) const
+    { 
+      char_type ret = { value_type(__c) };
+      return ret;
+    }
+
+  template<>
+    const char*
+    ctype<pod_ushort>::
+    do_widen(const char* __lo, const char* __hi, char_type* __dest) const
+    {
+      while (__lo < __hi)
+       {
+         *__dest = this->do_widen(*__lo);
+         ++__lo;
+         ++__dest;
+       }
+      return __hi;
+    }
+
+  template<>
+    char
+    ctype<pod_ushort>::
+    do_narrow(char_type __wc, char) const
+    { return static_cast<char>(__wc.value); }
+
+  template<>
+    const pod_ushort*
+    ctype<pod_ushort>::
+    do_narrow(const pod_ushort* __lo, const pod_ushort* __hi, 
+             char, char* __dest) const
+    {
+      while (__lo < __hi)
+       {
+         *__dest = this->do_narrow(*__lo, char());
+         ++__lo;
+         ++__dest;
+       }
+      return __hi;
+    }
+
+  template<>
+    ctype<pod_ushort>::~ctype() { }
+
+  template<>
+    void
+    numpunct<pod_ushort>::_M_initialize_numpunct(__c_locale)
+    {
+      if (!_M_data)
+       _M_data = new __numpunct_cache<pod_ushort>;
+
+      _M_data->_M_grouping = "";
+      _M_data->_M_use_grouping = false;
+
+      _M_data->_M_decimal_point.value =  value_type('.');
+      _M_data->_M_thousands_sep.value = value_type(',');
+      
+      for (size_t i = 0; i < __num_base::_S_oend; ++i)
+       {
+         value_type v = __num_base::_S_atoms_out[i];
+         _M_data->_M_atoms_out[i].value = v;
+       }
+      _M_data->_M_atoms_out[__num_base::_S_oend] = pod_ushort();
+      
+      for (size_t j = 0; j < __num_base::_S_iend; ++j)
+       _M_data->_M_atoms_in[j].value = value_type(__num_base::_S_atoms_in[j]);
+      _M_data->_M_atoms_in[__num_base::_S_iend] = pod_ushort();
+
+      // "true"
+      pod_ushort* __truename = new pod_ushort[4 + 1];
+      __truename[0].value = value_type('t');
+      __truename[1].value = value_type('r');
+      __truename[2].value = value_type('u');
+      __truename[3].value = value_type('e');
+      __truename[4] = pod_ushort();
+      _M_data->_M_truename = __truename;
+
+      // "false"
+      pod_ushort* __falsename = new pod_ushort[5 + 1];
+      __falsename[0].value = value_type('f');
+      __falsename[1].value = value_type('a');
+      __falsename[2].value = value_type('l');
+      __falsename[3].value = value_type('s');
+      __falsename[4].value = value_type('e');
+      __falsename[5] = pod_ushort();
+      _M_data->_M_falsename = __falsename;
+    }
+
+  template<>
+    numpunct<pod_ushort>::~numpunct()
+    { delete _M_data; }
+} // namespace std