1 // { dg-require-namedlocale "de_DE.ISO8859-15" }
2 
3 // 2004-03-01  Paolo Carlini  <pcarlini@suse.de>
4 
5 // Copyright (C) 2004-2020 Free Software Foundation, Inc.
6 //
7 // This file is part of the GNU ISO C++ Library.  This library is free
8 // software; you can redistribute it and/or modify it under the
9 // terms of the GNU General Public License as published by the
10 // Free Software Foundation; either version 3, or (at your option)
11 // any later version.
12 
13 // This library is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 // GNU General Public License for more details.
17 
18 // You should have received a copy of the GNU General Public License along
19 // with this library; see the file COPYING3.  If not see
20 // <http://www.gnu.org/licenses/>.
21 
22 // 22.2.6.1.1 money_get members
23 
24 #include <locale>
25 #include <sstream>
26 #include <testsuite_hooks.h>
27 
28 // The grammar doesn't allow thousands separator at the beginning of a
29 // string, neither two consecutive thousands separators.
test01()30 void test01()
31 {
32   using namespace std;
33 
34   typedef istreambuf_iterator<char> iterator_type;
35 
36   // basic construction
37   locale loc_c = locale::classic();
38   locale loc_de = locale(ISO_8859(15,de_DE));
39   VERIFY( loc_c != loc_de );
40 
41   iterator_type end01, end02;
42   istringstream iss;
43   iss.imbue(loc_de);
44   // cache the money_get facet
45   const money_get<char>& mon_get = use_facet<money_get<char> >(iss.getloc());
46 
47   iss.str(".100");
48   iterator_type is_it01(iss);
49   long double result1;
50   ios_base::iostate err01 = ios_base::goodbit;
51   end01 = mon_get.get(is_it01, end01, true, iss, err01, result1);
52   VERIFY( err01 == ios_base::failbit );
53   VERIFY( *end01 == '.' );
54 
55   iss.str("30..0");
56   iterator_type is_it02(iss);
57   long double result2;
58   ios_base::iostate err02 = ios_base::goodbit;
59   end02 = mon_get.get(is_it02, end02, false, iss, err02, result2);
60   VERIFY( err02 == ios_base::failbit );
61   VERIFY( *end02 == '.' );
62 }
63 
main()64 int main()
65 {
66   test01();
67   return 0;
68 }
69