blob: 1d8f22060d17cd771d92fd319d6816c3ed8ccabb (
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
/***
* ostrdbl.cxx - definitions for ostream class operator<<(double) functions
*
* Copyright (c) 1991-1992, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Contains the member function definitions for ostream operator<<(double).
*
*Revision History:
* 09-23-91 KRS Created. Split out from ostream.cxx for granularity.
* 10-24-91 KRS Combine float version with double.
*
*******************************************************************************/
#include <cruntime.h>
#include <internal.h>
#include <stdlib.h>
#include <stdio.h>
#include <float.h>
#include <iostream.h>
#pragma hdrstop
#pragma check_stack(on) // large buffer(s)
ostream& ostream::operator<<(double f)
{
_WINSTATIC char obuffer[24];
_WINSTATIC char fmt[8];
_WINSTATIC char leader[4];
char * optr = obuffer;
int x = 0;
// x_floatused nonzero indicates called for float, not double
unsigned int curprecision = (x_floatused) ? FLT_DIG : DBL_DIG;
x_floatused = 0; // reset for next call
curprecision = __min((unsigned)x_precision,curprecision);
if (opfx()) {
if (x_flags & ios::showpos)
leader[x++] = '+';
if (x_flags & ios::showpoint)
leader[x++] = '#'; // show decimal and trailing zeros
leader[x] = '\0';
x = sprintf(fmt,"%%%s.%.0ug",leader,curprecision) - 1;
if ((x_flags & ios::floatfield)==ios::fixed)
fmt[x] = 'f';
else
{
if ((x_flags & ios::floatfield)==ios::scientific)
fmt[x] = 'e';
if (x_flags & uppercase)
fmt[x] = (char)toupper(fmt[x]);
}
sprintf(optr,fmt,f);
x = 0;
if (*optr=='+' || *optr=='-')
leader[x++] = *(optr++);
leader[x] = '\0';
writepad(leader,optr);
osfx();
}
return *this;
}
|
