1// { dg-require-namedlocale "de_DE@euro" }
2
3// 2001-08-27 Benjamin Kosnik  <bkoz@redhat.com>
4
5// Copyright (C) 2001-2015 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.2.1 money_put 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;
32  typedef ostreambuf_iterator<wchar_t> iterator_type;
33
34  bool test __attribute__((unused)) = true;
35
36  // basic construction
37  locale loc_c = locale::classic();
38  locale loc_de = locale("de_DE@euro");
39  VERIFY( loc_c != loc_de );
40
41  // sanity check the data is correct.
42  const wstring empty;
43
44  // total EPA budget FY 2002
45  const long double  digits1 = 720000000000.0;
46
47  // cache the money_put facet
48  wostringstream oss;
49  oss.imbue(loc_de);
50  const money_put<wchar_t>& mon_put =
51    use_facet<money_put<wchar_t> >(oss.getloc());
52
53  mon_put.put(oss.rdbuf(), true, oss, L' ', digits1);
54  wstring result1 = oss.str();
55  VERIFY( result1 == L"7.200.000.000,00 " );
56
57  oss.str(empty);
58  mon_put.put(oss.rdbuf(), false, oss, L' ', digits1);
59  wstring result2 = oss.str();
60  VERIFY( result2 == L"7.200.000.000,00 " );
61
62  // intl and non-intl versions should be the same.
63  VERIFY( result1 == result2 );
64
65  // now try with showbase, to get currency symbol in format
66  oss.setf(ios_base::showbase);
67
68  oss.str(empty);
69  mon_put.put(oss.rdbuf(), true, oss, L' ', digits1);
70  wstring result3 = oss.str();
71  VERIFY( result3 == L"7.200.000.000,00 EUR " );
72
73  oss.str(empty);
74  mon_put.put(oss.rdbuf(), false, oss, L' ', digits1);
75  wstring result4 = oss.str();
76  VERIFY( result4 == L"7.200.000.000,00 \x20ac" );
77
78  // intl and non-intl versions should be different.
79  VERIFY( result3 != result4 );
80  VERIFY( result3 != result1 );
81  VERIFY( result4 != result2 );
82}
83
84int main()
85{
86  test03();
87  return 0;
88}
89