| // 2000-02-10 |
| // Petter Urkedal <petter@matfys.lth.se> |
| |
| // Copyright (C) 2000, 2003 Free Software Foundation |
| // |
| // This file is part of the GNU ISO C++ Library. This library is free |
| // software; you can redistribute it and/or modify it under the |
| // terms of the GNU General Public License as published by the |
| // Free Software Foundation; either version 2, or (at your option) |
| // any later version. |
| |
| // This library is distributed in the hope that it will be useful, |
| // but WITHOUT ANY WARRANTY; without even the implied warranty of |
| // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| // GNU General Public License for more details. |
| |
| // You should have received a copy of the GNU General Public License along |
| // with this library; see the file COPYING. If not, write to the Free |
| // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, |
| // USA. |
| |
| |
| #include <iostream> |
| #include <string> |
| #include <sstream> |
| #include <complex> |
| #include <testsuite_hooks.h> |
| #include <cmath> |
| |
| template<typename R> |
| inline bool flteq(R x, R y) |
| { |
| if (x == R(0)) return y == R(0); |
| else return std::fabs(x-y) < 1e-6*std::fabs(x); |
| } |
| |
| template<typename R> |
| int |
| test_good(std::string str, R x, R y) |
| { |
| bool test __attribute__((unused)) = true; |
| std::complex<R> z; |
| char ch; |
| std::istringstream iss(str); |
| iss >> z >> ch; |
| VERIFY( iss.good() ); |
| VERIFY( flteq(z.real(), x) ); |
| VERIFY( flteq(z.imag(), y) ); |
| VERIFY( ch == '#' ); |
| return 0; |
| } |
| |
| template<typename R> |
| int |
| test_fail(std::string str) |
| { |
| bool test __attribute__((unused)) = true; |
| std::complex<R> z; |
| std::istringstream iss(str); |
| iss >> z; |
| VERIFY( iss.fail() && !iss.bad() ); |
| return 0; |
| } |
| |
| template<typename R> |
| int |
| testall() |
| { |
| test_good<R>("(-1.1,3.7)#", -1.1, 3.7); |
| test_good<R>("( .7e6 , \n-3.1)#", .7e6, -3.1); |
| test_good<R>("(\t0,-1)#", 0.0, -1.0); |
| test_good<R>("(-3.14)#", -3.14, 0.0); |
| test_good<R>("-.1#", -.1, 0.0); |
| test_good<R>(" ( -2.7e3 )#", -2.7e3, 0.0); |
| test_good<R>(" -.1#", -.1, 0.0); |
| test_fail<R>("(a,1)"); |
| test_fail<R>("(,1)"); |
| test_fail<R>("(1,a)"); |
| test_fail<R>("(1, )"); |
| test_fail<R>("|1,1)"); |
| test_fail<R>("(1|1)"); |
| test_fail<R>("(1,1|"); |
| return 0; |
| } |
| |
| // libstdc++/2970 |
| void test01() |
| { |
| using namespace std; |
| bool test __attribute__((unused)) = true; |
| |
| complex<float> cf01(-1.1, -333.2); |
| stringstream ss; |
| ss << cf01; |
| string str = ss.str(); |
| VERIFY( str == "(-1.1,-333.2)" ); |
| } |
| |
| // libstdc++/2985 |
| struct gnu_char_traits : public std::char_traits<char> |
| { }; |
| |
| typedef std::basic_ostringstream<char, gnu_char_traits> gnu_sstream; |
| template class std::basic_string<char, gnu_char_traits, std::allocator<char> >; |
| |
| void test02() |
| { |
| bool test __attribute__((unused)) = true; |
| |
| // Construct locale with specialized facets. |
| typedef gnu_sstream::__num_put_type numput_type; |
| typedef gnu_sstream::__num_get_type numget_type; |
| std::locale loc_c = std::locale::classic(); |
| std::locale loc_1(loc_c, new numput_type); |
| std::locale loc_2(loc_1, new numget_type); |
| VERIFY( std::has_facet<numput_type>(loc_2) ); |
| VERIFY( std::has_facet<numget_type>(loc_2) ); |
| |
| gnu_sstream sstr; |
| sstr.imbue(loc_2); |
| |
| |
| std::complex<double> x(3, 4); |
| sstr << x; |
| VERIFY( sstr.str() == "(3,4)" ); |
| } |
| |
| int |
| main() |
| { |
| testall<float>(); |
| testall<double>(); |
| testall<long double>(); |
| |
| test01(); |
| test02(); |
| |
| return 0; |
| } |
| |
| |
| |
| |