blob: a129d4d20516d849b81daa58cb0fbdd2fb235451 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
/***
* istrdbl.cxx - definition for operator>>(double) member funct for istream class
*
* Copyright (c) 1991-1992, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Definition of operator>>(double) member function for istream class.
* [AT&T C++]
*
*Revision History:
* 09-26-91 KRS Created. Split off from istream.cxx for granularity.
* 12-30-92 KRS Fix indirection problem with **endptr.
*
*******************************************************************************/
#include <cruntime.h>
#include <internal.h>
#include <stdlib.h>
#include <iostream.h>
#pragma hdrstop
#pragma check_stack(on) // large buffer(s)
// CONSIDER: validate this maximum length
#define MAXDBLSIZ 28
istream& istream::operator>>(double& n)
{
_WINSTATIC char ibuffer[MAXDBLSIZ];
char ** endptr = (char**)NULL;
if (ipfx(0))
{
if (getdouble(ibuffer, MAXDBLSIZ)>0)
{
n = strtod(ibuffer, endptr);
#if 0
if (**endptr)
{
//UNDONE: put back any unread characters, if possible
}
#endif
}
isfx();
}
return *this;
}
|
