]> git.saurik.com Git - apple/libc.git/blame - gdtoa/FreeBSD/gdtoa-strtord.c.patch
Libc-391.2.5.tar.gz
[apple/libc.git] / gdtoa / FreeBSD / gdtoa-strtord.c.patch
CommitLineData
3d9156a7
A
1--- gdtoa-strtord.c.orig 2005-01-20 20:12:37.000000000 -0800
2+++ gdtoa-strtord.c 2005-02-17 13:06:38.000000000 -0800
3@@ -67,27 +67,3 @@
4 if (k & STRTOG_Neg)
5 L[_0] |= 0x80000000L;
6 }
7-
8- int
9-#ifdef KR_headers
10-strtord(s, sp, rounding, d) CONST char *s; char **sp; int rounding; double *d;
11-#else
12-strtord(CONST char *s, char **sp, int rounding, double *d)
13-#endif
14-{
15- static FPI fpi0 = { 53, 1-1023-53+1, 2046-1023-53+1, 1, SI };
16- FPI *fpi, fpi1;
17- ULong bits[2];
18- Long exp;
19- int k;
20-
21- fpi = &fpi0;
22- if (rounding != FPI_Round_near) {
23- fpi1 = fpi0;
24- fpi1.rounding = rounding;
25- fpi = &fpi1;
26- }
27- k = strtodg(s, sp, fpi, &exp, bits);
28- ULtod((ULong*)d, bits, exp, k);
29- return k;
30- }