|
Packit |
5c3484 |
/* __gmpz_operator_in_nowhite -- C++-style input of mpz_t, no whitespace skip.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
Copyright 2001, 2003 Free Software Foundation, Inc.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
This file is part of the GNU MP Library.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
The GNU MP Library is free software; you can redistribute it and/or modify
|
|
Packit |
5c3484 |
it under the terms of either:
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
* the GNU Lesser General Public License as published by the Free
|
|
Packit |
5c3484 |
Software Foundation; either version 3 of the License, or (at your
|
|
Packit |
5c3484 |
option) any later version.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
or
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
* the GNU General Public License as published by the Free Software
|
|
Packit |
5c3484 |
Foundation; either version 2 of the License, or (at your option) any
|
|
Packit |
5c3484 |
later version.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
or both in parallel, as here.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
The GNU MP Library is distributed in the hope that it will be useful, but
|
|
Packit |
5c3484 |
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
Packit |
5c3484 |
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
Packit |
5c3484 |
for more details.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
You should have received copies of the GNU General Public License and the
|
|
Packit |
5c3484 |
GNU Lesser General Public License along with the GNU MP Library. If not,
|
|
Packit |
5c3484 |
see https://www.gnu.org/licenses/. */
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
#include <cctype>
|
|
Packit |
5c3484 |
#include <iostream>
|
|
Packit |
5c3484 |
#include <string>
|
|
Packit |
5c3484 |
#include "gmp.h"
|
|
Packit |
5c3484 |
#include "gmp-impl.h"
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
using namespace std;
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
// For g++ libstdc++ parsing see num_get<chartype,initer>::_M_extract_int in
|
|
Packit |
5c3484 |
// include/bits/locale_facets.tcc.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
istream &
|
|
Packit |
5c3484 |
__gmpz_operator_in_nowhite (istream &i, mpz_ptr z, char c)
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
int base;
|
|
Packit |
5c3484 |
string s;
|
|
Packit |
5c3484 |
bool ok = false, zero, showbase;
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (c == '-' || c == '+') // sign
|
|
Packit |
5c3484 |
{
|
|
Packit |
5c3484 |
if (c == '-') // mpz_set_str doesn't accept '+'
|
|
Packit |
5c3484 |
s = "-";
|
|
Packit |
5c3484 |
i.get(c);
|
|
Packit |
5c3484 |
}
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
base = __gmp_istream_set_base(i, c, zero, showbase); // select the base
|
|
Packit |
5c3484 |
__gmp_istream_set_digits(s, i, c, ok, base); // read the number
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (i.good()) // last character read was non-numeric
|
|
Packit |
5c3484 |
i.putback(c);
|
|
Packit |
5c3484 |
else if (i.eof() && (ok || zero)) // stopped just before eof
|
|
Packit |
5c3484 |
i.clear(ios::eofbit);
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
if (ok)
|
|
Packit |
5c3484 |
ASSERT_NOCARRY (mpz_set_str (z, s.c_str(), base)); // extract the number
|
|
Packit |
5c3484 |
else if (zero)
|
|
Packit |
5c3484 |
mpz_set_ui(z, 0);
|
|
Packit |
5c3484 |
else
|
|
Packit |
5c3484 |
i.setstate(ios::failbit); // read failed
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
return i;
|
|
Packit |
5c3484 |
}
|