]> git.ipfire.org Git - thirdparty/gcc.git/blame - libstdc++-v3/testsuite/22_locale/money_get/get/char/15.cc
testsuite_hooks.cc: Remove try_named_locale.
[thirdparty/gcc.git] / libstdc++-v3 / testsuite / 22_locale / money_get / get / char / 15.cc
CommitLineData
f63a8495
PC
1// { dg-require-namedlocale "" }
2
08ff96c3
PC
3// 2004-03-01 Paolo Carlini <pcarlini@suse.de>
4
f63a8495 5// Copyright (C) 2004, 2005 Free Software Foundation
08ff96c3
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
10// Free Software Foundation; either version 2, 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 COPYING. If not, write to the Free
20// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
21// USA.
22
23// 22.2.6.1.1 money_get members
24
25#include <locale>
26#include <sstream>
27#include <testsuite_hooks.h>
28
29// The grammar doesn't allow thousands separator at the beginning of a
30// string, neither two consecutive thousands separators.
31void test01()
32{
33 using namespace std;
34 bool test __attribute__((unused)) = true;
35
36 typedef istreambuf_iterator<char> iterator_type;
37
38 // basic construction
39 locale loc_c = locale::classic();
f63a8495 40 locale loc_de = locale("de_DE@euro");
08ff96c3
PC
41 VERIFY( loc_c != loc_de );
42
43 iterator_type end01, end02;
44 istringstream iss;
45 iss.imbue(loc_de);
46 // cache the money_get facet
47 const money_get<char>& mon_get = use_facet<money_get<char> >(iss.getloc());
48
49 iss.str(".100");
50 iterator_type is_it01(iss);
51 long double result1;
52 ios_base::iostate err01 = ios_base::goodbit;
53 end01 = mon_get.get(is_it01, end01, true, iss, err01, result1);
54 VERIFY( err01 == ios_base::failbit );
55 VERIFY( *end01 == '.' );
56
57 iss.str("30..0");
58 iterator_type is_it02(iss);
59 long double result2;
60 ios_base::iostate err02 = ios_base::goodbit;
61 end02 = mon_get.get(is_it02, end02, false, iss, err02, result2);
62 VERIFY( err02 == ios_base::failbit );
63 VERIFY( *end02 == '.' );
64}
65
66int main()
67{
68 test01();
69 return 0;
70}