OSDN Git Service

* config/d30v/d30v.h: Delete reference to ASM_FINAL_SPEC.
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / src / ctype.cc
1 // Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002
2 // Free Software Foundation, Inc.
3 //
4 // This file is part of the GNU ISO C++ Library.  This library is free
5 // software; you can redistribute it and/or modify it under the
6 // terms of the GNU General Public License as published by the
7 // Free Software Foundation; either version 2, or (at your option)
8 // any later version.
9
10 // This library is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 // GNU General Public License for more details.
14
15 // You should have received a copy of the GNU General Public License along
16 // with this library; see the file COPYING.  If not, write to the Free
17 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
18 // USA.
19
20 // As a special exception, you may use this file as part of a free software
21 // library without restriction.  Specifically, if other files instantiate
22 // templates or use macros or inline functions from this file, or you compile
23 // this file and link it with other files to produce an executable, this
24 // file does not by itself cause the resulting executable to be covered by
25 // the GNU General Public License.  This exception does not however
26 // invalidate any other reasons why the executable file might be covered by
27 // the GNU General Public License.
28
29 #include <locale>
30
31 namespace std 
32 {
33   // XXX At some point, just rename this file to ctype_members_char.cc
34   // and compile it as a separate file instead of including it here.
35   // Platform-specific initialization code for ctype tables.
36   #include <bits/ctype_noninline.h>
37
38   // Definitions for locale::id of standard facets that are specialized.
39   locale::id ctype<char>::id;
40
41 #ifdef _GLIBCPP_USE_WCHAR_T  
42   locale::id ctype<wchar_t>::id;
43 #endif
44
45   template<>
46     const ctype<char>&
47     use_facet<ctype<char> >(const locale& __loc)
48     {
49       size_t __i = ctype<char>::id._M_id();
50       const locale::_Impl* __tmp = __loc._M_impl;
51       return static_cast<const ctype<char>&>(*(__tmp->_M_facets[__i]));
52     }
53
54 #ifdef _GLIBCPP_USE_WCHAR_T
55   template<>
56     const ctype<wchar_t>&
57     use_facet<ctype<wchar_t> >(const locale& __loc)
58     {
59       size_t __i = ctype<wchar_t>::id._M_id();
60       const locale::_Impl* __tmp = __loc._M_impl;
61       return static_cast<const ctype<wchar_t>&>(*(__tmp->_M_facets[__i]));
62     }
63 #endif
64
65   // Definitions for static const data members of ctype_base.
66   const ctype_base::mask ctype_base::space;
67   const ctype_base::mask ctype_base::print;
68   const ctype_base::mask ctype_base::cntrl;
69   const ctype_base::mask ctype_base::upper;
70   const ctype_base::mask ctype_base::lower;
71   const ctype_base::mask ctype_base::alpha;
72   const ctype_base::mask ctype_base::digit;
73   const ctype_base::mask ctype_base::punct;
74   const ctype_base::mask ctype_base::xdigit;
75   const ctype_base::mask ctype_base::alnum;
76   const ctype_base::mask ctype_base::graph;
77
78   const size_t ctype<char>::table_size;
79
80   ctype<char>::~ctype()
81   { 
82     _S_destroy_c_locale(_M_c_locale_ctype);
83     if (_M_del) 
84       delete[] this->table(); 
85   }
86
87   // These are dummy placeholders as these virtual functions are never called.
88   bool 
89   ctype<char>::do_is(mask, char_type) const 
90   { return false; }
91   
92   const char*
93   ctype<char>::do_is(const char_type* __c, const char_type*, mask*) const 
94   { return __c; }
95   
96   const char*
97   ctype<char>::do_scan_is(mask, const char_type* __c, const char_type*) const 
98   { return __c; }
99
100   const char* 
101   ctype<char>::do_scan_not(mask, const char_type* __c, const char_type*) const
102   { return __c; }
103
104   char
105   ctype<char>::do_widen(char __c) const
106   { return __c; }
107   
108   const char* 
109   ctype<char>::do_widen(const char* __lo, const char* __hi, char* __dest) const
110   {
111     memcpy(__dest, __lo, __hi - __lo);
112     return __hi;
113   }
114   
115   char
116   ctype<char>::do_narrow(char __c, char /*__dfault*/) const
117   { return __c; }
118   
119   const char* 
120   ctype<char>::do_narrow(const char* __lo, const char* __hi, 
121                          char /*__dfault*/, char* __dest) const
122   {
123     memcpy(__dest, __lo, __hi - __lo);
124     return __hi;
125   }
126
127 #ifdef _GLIBCPP_USE_WCHAR_T
128   ctype<wchar_t>::ctype(size_t __refs) 
129   : __ctype_abstract_base<wchar_t>(__refs)
130   { _M_c_locale_ctype = _S_c_locale; }
131
132   ctype<wchar_t>::ctype(__c_locale __cloc, size_t __refs) 
133   : __ctype_abstract_base<wchar_t>(__refs) 
134   { _M_c_locale_ctype = _S_clone_c_locale(__cloc); }
135
136   ctype<wchar_t>::~ctype() 
137   { _S_destroy_c_locale(_M_c_locale_ctype); }
138
139   template<>
140     ctype_byname<wchar_t>::ctype_byname(const char* __s, size_t __refs)
141     : ctype<wchar_t>(__refs) 
142     {   
143       _S_destroy_c_locale(_M_c_locale_ctype);
144       _S_create_c_locale(_M_c_locale_ctype, __s); 
145     }
146 #endif
147 } // namespace std
148