1 // { dg-require-namedlocale "en_HK.ISO8859-1" }
2 
3 // 2004-03-15  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 // If (str.flags() & str.showbase) is false, the currency symbol is optional,
29 // but, if found, must be consumed entirely.
test01()30 void test01()
31 {
32   using namespace std;
33   typedef istreambuf_iterator<char> iterator_type;
34 
35   // basic construction
36   locale loc_c = locale::classic();
37   locale loc_hk = locale(ISO_8859(1,en_HK));
38   VERIFY( loc_c != loc_hk );
39 
40   iterator_type end, end01, end02;
41   istringstream iss;
42   iss.imbue(loc_hk);
43   // cache the money_get facet
44   const money_get<char>& mon_get =
45     use_facet<money_get<char> >(iss.getloc());
46 
47   iss.str("HK7,200,000,000.00");
48   iterator_type is_it01(iss);
49   string result01;
50   ios_base::iostate err01 = ios_base::goodbit;
51   end01 = mon_get.get(is_it01, end, false, iss, err01, result01);
52   VERIFY( err01 == ios_base::failbit );
53   VERIFY( *end01 == '7' );
54 
55   iss.str("(HK100,000,000,000.00)");
56   iterator_type is_it02(iss);
57   string result02;
58   ios_base::iostate err02 = ios_base::goodbit;
59   end02 = mon_get.get(is_it02, end, true, iss, err02, result02);
60   VERIFY( err02 == ios_base::failbit );
61   VERIFY( *end02 == '1' );
62 }
63 
main()64 int main()
65 {
66   test01();
67   return 0;
68 }
69