]> CyberLeo.Net >> Repos - FreeBSD/releng/9.2.git/blob - contrib/libstdc++/config/os/mingw32/ctype_noninline.h
- Copy stable/9 to releng/9.2 as part of the 9.2-RELEASE cycle.
[FreeBSD/releng/9.2.git] / 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, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
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 /** @file ctype_noninline.h
31  *  This is an internal header file, included by other library headers.
32  *  You should not attempt to use it directly.
33  */
34
35 //
36 // ISO C++ 14882: 22.1  Locales
37 //
38   
39 // Information as gleaned from /mingw32/include/ctype.h.
40
41   // This should be in mingw's ctype.h but isn't in older versions
42   // Static classic C-locale table.  _ctype[0] is EOF
43   extern "C"  unsigned short  __declspec(dllimport) _ctype[];
44
45   const ctype_base::mask*
46   ctype<char>::classic_table() throw()
47   { return _ctype + 1; }  
48
49   ctype<char>::ctype(__c_locale, const mask* __table, bool __del, 
50                      size_t __refs) 
51   : facet(__refs), _M_del(__table != 0 && __del), 
52   _M_toupper(NULL), _M_tolower(NULL),
53   _M_table(__table ? __table : classic_table())  
54   { 
55     memset(_M_widen, 0, sizeof(_M_widen));
56     _M_widen_ok = 0;
57     memset(_M_narrow, 0, sizeof(_M_narrow));
58     _M_narrow_ok = 0;
59   }
60
61   ctype<char>::ctype(const mask* __table, bool __del, size_t __refs) 
62   : facet(__refs), _M_del(__table != 0 && __del), 
63   _M_toupper(NULL), _M_tolower(NULL),
64   _M_table(__table ? __table : classic_table()) 
65   { 
66     memset(_M_widen, 0, sizeof(_M_widen));
67     _M_widen_ok = 0;
68     memset(_M_narrow, 0, sizeof(_M_narrow));
69     _M_narrow_ok = 0;
70   }
71
72   char
73   ctype<char>::do_toupper(char __c) const
74   { return (this->is(ctype_base::lower, __c) ? (__c - 'a' + 'A') : __c); }
75
76   const char*
77   ctype<char>::do_toupper(char* __low, const char* __high) const
78   {
79     while (__low < __high)
80       {
81         *__low = this->do_toupper(*__low);
82         ++__low;
83       }
84     return __high;
85   }
86
87   char
88   ctype<char>::do_tolower(char __c) const
89   { return (this->is(ctype_base::upper, __c) ? (__c - 'A' + 'a') : __c); }
90
91   const char* 
92   ctype<char>::do_tolower(char* __low, const char* __high) const
93   {
94     while (__low < __high)
95       {
96         *__low = this->do_tolower(*__low);
97         ++__low;
98       }
99     return __high;
100   }
101
102
103
104