contrib/libstdc++/config/os/mingw32/ctype_noninline.h

   1 // Locale support -*- C++ -*-
   2
   3 // Copyright (C) 1997, 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
   4 //
   5 // This file is part of the GNU ISO C++ Library.  This library is free
   6 // software; you can redistribute it and/or modify it under the
   7 // terms of the GNU General Public License as published by the
   8 // Free Software Foundation; either version 2, or (at your option)
   9 // any later version.
  10
  11 // This library is distributed in the hope that it will be useful,
  12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 // GNU General Public License for more details.
  15
  16 // You should have received a copy of the GNU General Public License along
  17 // with this library; see the file COPYING.  If not, write to the Free
  18 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  19 // USA.
  20
  21 // As a special exception, you may use this file as part of a free software
  22 // library without restriction.  Specifically, if other files instantiate
  23 // templates or use macros or inline functions from this file, or you compile
  24 // this file and link it with other files to produce an executable, this
  25 // file does not by itself cause the resulting executable to be covered by
  26 // the GNU General Public License.  This exception does not however
  27 // invalidate any other reasons why the executable file might be covered by
  28 // the GNU General Public License.
  29
  30 //
  31 // ISO C++ 14882: 22.1  Locales
  32 //
  33
  34 // Information as gleaned from /mingw32/include/ctype.h.
  35
  36   // This should be in mingw's ctype.h but isn't in older versions
  37   // Static classic C-locale table.  _ctype[0] is EOF
  38   extern "C"  unsigned short  __declspec(dllimport) _ctype[];
  39
  40   const ctype_base::mask*
  41   ctype<char>::classic_table() throw()
  42   { return _ctype + 1; }
  43
  44   ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
  45                      size_t __refs)
  46   : facet(__refs), _M_del(__table != 0 && __del),
  47   _M_toupper(NULL), _M_tolower(NULL),
  48   _M_table(__table ? __table : classic_table())
  49   {
  50     memset(_M_widen, 0, sizeof(_M_widen));
  51     _M_widen_ok = 0;
  52     memset(_M_narrow, 0, sizeof(_M_narrow));
  53     _M_narrow_ok = 0;
  54   }
  55
  56   ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
  57   : facet(__refs), _M_del(__table != 0 && __del),
  58   _M_toupper(NULL), _M_tolower(NULL),
  59   _M_table(__table ? __table : classic_table())
  60   {
  61     memset(_M_widen, 0, sizeof(_M_widen));
  62     _M_widen_ok = 0;
  63     memset(_M_narrow, 0, sizeof(_M_narrow));
  64     _M_narrow_ok = 0;
  65   }
  66
  67   char
  68   ctype<char>::do_toupper(char __c) const
  69   { return (this->is(ctype_base::lower, __c) ? (__c - 'a' + 'A') : __c); }
  70
  71   const char*
  72   ctype<char>::do_toupper(char* __low, const char* __high) const
  73   {
  74     while (__low < __high)
  75       {
  76         *__low = this->do_toupper(*__low);
  77         ++__low;
  78       }
  79     return __high;
  80   }
  81
  82   char
  83   ctype<char>::do_tolower(char __c) const
  84   { return (this->is(ctype_base::upper, __c) ? (__c - 'A' + 'a') : __c); }
  85
  86   const char*
  87   ctype<char>::do_tolower(char* __low, const char* __high) const
  88   {
  89     while (__low < __high)
  90       {
  91         *__low = this->do_tolower(*__low);
  92         ++__low;
  93       }
  94     return __high;
  95   }
  96
  97
  98
  99