]> git.ipfire.org Git - thirdparty/gcc.git/blame - libstdc++-v3/testsuite/22_locale/money_get/get/char/18.cc
Update copyright years.
[thirdparty/gcc.git] / libstdc++-v3 / testsuite / 22_locale / money_get / get / char / 18.cc
CommitLineData
4216708a 1// { dg-require-namedlocale "en_HK.ISO8859-1" }
f63a8495 2
33674f00
PC
3// 2004-03-15 Paolo Carlini <pcarlini@suse.de>
4
83ffe9cd 5// Copyright (C) 2004-2023 Free Software Foundation, Inc.
33674f00
PC
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
748086b7 10// Free Software Foundation; either version 3, or (at your option)
33674f00
PC
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
748086b7
JJ
19// with this library; see the file COPYING3. If not see
20// <http://www.gnu.org/licenses/>.
33674f00
PC
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.
30void test01()
31{
32 using namespace std;
33 typedef istreambuf_iterator<char> iterator_type;
34
33674f00
PC
35 // basic construction
36 locale loc_c = locale::classic();
4216708a 37 locale loc_hk = locale(ISO_8859(1,en_HK));
33674f00
PC
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
64int main()
65{
66 test01();
67 return 0;
68}