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 string version
29void test01()
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 string digits1("720000000000");
46
47  // input less than frac_digits
48  const string digits2("-1");
49
50  // cache the money_put facet
51  ostringstream oss;
52  oss.imbue(loc_de);
53  const money_put<char>& mon_put = use_facet<money_put<char> >(oss.getloc());
54
55  mon_put.put(oss.rdbuf(), true, oss, ' ', digits1);
56  string result1 = oss.str();
57  VERIFY( result1 == "7.200.000.000,00 ");
58
59  oss.str(empty);
60  mon_put.put(oss.rdbuf(), false, oss, ' ', digits1);
61  string result2 = oss.str();
62  VERIFY( result2 == "7.200.000.000,00 ");
63
64  // intl and non-intl versions should be the same.
65  VERIFY( result1 == result2 );
66
67  // now try with showbase, to get currency symbol in format
68  oss.setf(ios_base::showbase);
69
70  oss.str(empty);
71  mon_put.put(oss.rdbuf(), true, oss, ' ', digits1);
72  string result3 = oss.str();
73  VERIFY( result3 == "7.200.000.000,00 EUR ");
74
75  oss.str(empty);
76  mon_put.put(oss.rdbuf(), false, oss, ' ', digits1);
77  string result4 = oss.str();
78  VERIFY( result4 == "7.200.000.000,00 \244");
79
80  // intl and non-intl versions should be different.
81  VERIFY( result3 != result4 );
82  VERIFY( result3 != result1 );
83  VERIFY( result4 != result2 );
84
85  oss.unsetf(ios_base::showbase);
86
87  // test io.width() > length
88  // test various fill strategies
89  oss.str(empty);
90  oss.width(20);
91  mon_put.put(oss.rdbuf(), true, oss, '*', digits2);
92  string result10 = oss.str();
93  VERIFY( result10 == "***************-,01*");
94
95  oss.str(empty);
96  oss.width(20);
97  oss.setf(ios_base::internal);
98  mon_put.put(oss.rdbuf(), true, oss, '*', digits2);
99  string result11 = oss.str();
100  VERIFY( result11 == "-,01****************");
101}
102
103int main()
104{
105  test01();
106  return 0;
107}
108