2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / libstdc++-v3 / config / os / mingw32 / ctype_noninline.h
blobe493d403030a0f49ec79225af72b4ee47b387de3
1 // Locale support -*- C++ -*-
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.
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.
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.
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.
31 // ISO C++ 14882: 22.1 Locales
34 // Information as gleaned from /mingw32/include/ctype.h.
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[];
40 const ctype_base::mask*
41 ctype<char>::classic_table() throw()
42 { return _ctype + 1; }
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())
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;
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())
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;
67 char
68 ctype<char>::do_toupper(char __c) const
69 { return (this->is(ctype_base::lower, __c) ? (__c - 'a' + 'A') : __c); }
71 const char*
72 ctype<char>::do_toupper(char* __low, const char* __high) const
74 while (__low < __high)
76 *__low = this->do_toupper(*__low);
77 ++__low;
79 return __high;
82 char
83 ctype<char>::do_tolower(char __c) const
84 { return (this->is(ctype_base::upper, __c) ? (__c - 'A' + 'a') : __c); }
86 const char*
87 ctype<char>::do_tolower(char* __low, const char* __high) const
89 while (__low < __high)
91 *__low = this->do_tolower(*__low);
92 ++__low;
94 return __high;