// { dg-do run { target c++11 } }
// { dg-require-string-conversions "" }

// 2008-06-15  Paolo Carlini  <paolo.carlini@oracle.com>

// Copyright (C) 2008-2018 Free Software Foundation, Inc.
//
// 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 3, 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 COPYING3.  If not see
// <http://www.gnu.org/licenses/>.

// 21.4 Numeric Conversions [string.conversions]

#include <string>
#include <limits>
#include <stdexcept>
#include <testsuite_hooks.h>

void
test01()
{
  bool test = false;
  using namespace std;

  try
    {
      string one;
      stol(one);      
    }
  catch(std::invalid_argument)
    {
      test = true;
    }
  catch(...)
    {
    }
  VERIFY( test );

  test = false;
  try
    {
      string one("a");
      stol(one);      
    }
  catch(std::invalid_argument)
    {
      test = true;
    }
  catch(...)
    {
    }
  VERIFY( test );

  long l1 = 0;
  try
    {
      string one("a");
      l1 = stol(one, 0, 16);      
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == 10 );

  size_t idx1 = 0;
  try
    {
      string one("78");
      l1 = stol(one, &idx1, 8);      
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == 7 );
  VERIFY( idx1 = 1 );

  try
    {
      string one("10112");
      l1 = stol(one, &idx1, 2);      
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == 11 );
  VERIFY( idx1 == 4 );

  try
    {
      string one("0XE");
      l1 = stol(one, &idx1, 0);      
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == 14 );
  VERIFY( idx1 == 3 );

  test = false;
  try
    {
      string one(1000, '9');
      l1 = stol(one);
    }
  catch(std::out_of_range)
    {
      test = true;
    }
  catch(...)
    {
    }
  VERIFY( test );
  VERIFY( l1 == 14 );

  try
    {
      l1 = numeric_limits<long>::max();
      string one(to_string((long long)l1));
      l1 = stol(one);
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == numeric_limits<long>::max() );

  try
    {
      l1 = numeric_limits<long>::min();
      string one(to_string((long long)l1));
      l1 = stol(one);
    }
  catch(...)
    {
      test = false;
    }
  VERIFY( test );
  VERIFY( l1 == numeric_limits<long>::min() );
}

int main()
{
  test01();
  return 0;
}
