Subversion Repositories scarts

// 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;

}