]> git.ipfire.org Git - thirdparty/gcc.git/blame - libstdc++-v3/testsuite/22_locale/money_get/get/char/3.cc
Update copyright years.
[thirdparty/gcc.git] / libstdc++-v3 / testsuite / 22_locale / money_get / get / char / 3.cc
CommitLineData
4216708a 1// { dg-require-namedlocale "de_DE.ISO8859-15" }
f63a8495 2
5f8d36fe
BK
3// 2001-09-12 Benjamin Kosnik <bkoz@redhat.com>
4
8d9254fc 5// Copyright (C) 2001-2020 Free Software Foundation, Inc.
5f8d36fe
BK
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)
5f8d36fe
BK
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/>.
5f8d36fe
BK
21
22// 22.2.6.1.1 money_get members
23
24#include <locale>
25#include <sstream>
26#include <testsuite_hooks.h>
27
28// test double version
29void test03()
30{
31 using namespace std;
5f8d36fe
BK
32 typedef istreambuf_iterator<char> iterator_type;
33
5f8d36fe
BK
34 // basic construction
35 locale loc_c = locale::classic();
4216708a 36 locale loc_de = locale(ISO_8859(15,de_DE));
5f8d36fe 37 VERIFY( loc_c != loc_de );
5f8d36fe 38
5f8d36fe
BK
39 // total EPA budget FY 2002
40 const long double digits1 = 720000000000.0;
41
5f8d36fe
BK
42 iterator_type end;
43 istringstream iss;
44 iss.imbue(loc_de);
45 // cache the money_get facet
46 const money_get<char>& mon_get = use_facet<money_get<char> >(iss.getloc());
47
48 iss.str("7.200.000.000,00 ");
49 iterator_type is_it01(iss);
50 long double result1;
51 ios_base::iostate err01 = ios_base::goodbit;
52 mon_get.get(is_it01, end, true, iss, err01, result1);
53 VERIFY( result1 == digits1 );
54 VERIFY( err01 == ios_base::eofbit );
55
56 iss.str("7.200.000.000,00 ");
57 iterator_type is_it02(iss);
58 long double result2;
59 ios_base::iostate err02 = ios_base::goodbit;
60 mon_get.get(is_it02, end, false, iss, err02, result2);
61 VERIFY( result2 == digits1 );
62 VERIFY( err02 == ios_base::eofbit );
63}
64
65int main()
66{
3d838e28 67 test03();
5f8d36fe
BK
68 return 0;
69}