1// { dg-require-namedlocale "" }
2
3// 2001-08-27 Benjamin Kosnik  <bkoz@redhat.com>
4
5// Copyright (C) 2001, 2002, 2003, 2004, 2005, 2009 Free Software Foundation
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<char> 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 string empty;
43
44  // total EPA budget FY 2002
45  const long double  digits1 = 720000000000.0;
46
47  // cache the money_put facet
48  ostringstream oss;
49  oss.imbue(loc_de);
50  const money_put<char>& mon_put = use_facet<money_put<char> >(oss.getloc());
51
52  iterator_type os_it01 = mon_put.put(oss.rdbuf(), true, oss, ' ', digits1);
53  string result1 = oss.str();
54  VERIFY( result1 == "7.200.000.000,00 ");
55
56  oss.str(empty);
57  iterator_type os_it02 = mon_put.put(oss.rdbuf(), false, oss, ' ', digits1);
58  string result2 = oss.str();
59  VERIFY( result2 == "7.200.000.000,00 ");
60
61  // intl and non-intl versions should be the same.
62  VERIFY( result1 == result2 );
63
64  // now try with showbase, to get currency symbol in format
65  oss.setf(ios_base::showbase);
66
67  oss.str(empty);
68  iterator_type os_it03 = mon_put.put(oss.rdbuf(), true, oss, ' ', digits1);
69  string result3 = oss.str();
70  VERIFY( result3 == "7.200.000.000,00 EUR ");
71
72  oss.str(empty);
73  iterator_type os_it04 = mon_put.put(oss.rdbuf(), false, oss, ' ', digits1);
74  string result4 = oss.str();
75  VERIFY( result4 == "7.200.000.000,00 \244");
76
77  // intl and non-intl versions should be different.
78  VERIFY( result3 != result4 );
79  VERIFY( result3 != result1 );
80  VERIFY( result4 != result2 );
81}
82
83int main()
84{
85  test03();
86  return 0;
87}
88