Import Upstream version 20180207
[hcoop/debian/mlton.git] / runtime / gdtoa.hide-private-fns.patch
1 diff -Naur gdtoa.2/gdtoa.h gdtoa.3/gdtoa.h
2 --- gdtoa.2/gdtoa.h 2018-01-25 20:53:55.000000000 +0000
3 +++ gdtoa.3/gdtoa.h 2018-01-25 21:04:48.000000000 +0000
4 @@ -34,6 +34,7 @@
5
6 #include "arith.h"
7 #include <stddef.h> /* for size_t */
8 +#include "../export.h"
9
10 #ifndef Long
11 #define Long int
12 diff -Naur gdtoa.2/gdtoaimp.h gdtoa.3/gdtoaimp.h
13 --- gdtoa.2/gdtoaimp.h 2018-01-25 20:50:09.000000000 +0000
14 +++ gdtoa.3/gdtoaimp.h 2018-01-25 21:05:34.000000000 +0000
15 @@ -577,55 +577,55 @@
16 #define trailz trailz_D2A
17 #define ulp ulp_D2A
18
19 - extern char *add_nanbits ANSI((char*, size_t, ULong*, int));
20 - extern char *dtoa_result;
21 - extern CONST double bigtens[], tens[], tinytens[];
22 - extern unsigned char hexdig[];
23 - extern const char *InfName[6], *NanName[3];
24 + PRIVATE extern char *add_nanbits ANSI((char*, size_t, ULong*, int));
25 + PRIVATE extern char *dtoa_result;
26 + PRIVATE extern CONST double bigtens[], tens[], tinytens[];
27 + PRIVATE extern unsigned char hexdig[];
28 + PRIVATE extern const char *InfName[6], *NanName[3];
29
30 - extern Bigint *Balloc ANSI((int MTd));
31 - extern void Bfree ANSI((Bigint* MTd));
32 - extern void ULtof ANSI((ULong*, ULong*, Long, int));
33 - extern void ULtod ANSI((ULong*, ULong*, Long, int));
34 - extern void ULtodd ANSI((ULong*, ULong*, Long, int));
35 - extern void ULtoQ ANSI((ULong*, ULong*, Long, int));
36 - extern void ULtox ANSI((UShort*, ULong*, Long, int));
37 - extern void ULtoxL ANSI((ULong*, ULong*, Long, int));
38 - extern ULong any_on ANSI((Bigint*, int));
39 - extern double b2d ANSI((Bigint*, int*));
40 - extern int cmp ANSI((Bigint*, Bigint*));
41 - extern void copybits ANSI((ULong*, int, Bigint*));
42 - extern Bigint *d2b ANSI((double, int*, int* MTd));
43 - extern void decrement ANSI((Bigint*));
44 - extern Bigint *diff ANSI((Bigint*, Bigint* MTd));
45 - extern char *dtoa ANSI((double d, int mode, int ndigits,
46 + PRIVATE extern Bigint *Balloc ANSI((int MTd));
47 + PRIVATE extern void Bfree ANSI((Bigint* MTd));
48 + PRIVATE extern void ULtof ANSI((ULong*, ULong*, Long, int));
49 + PRIVATE extern void ULtod ANSI((ULong*, ULong*, Long, int));
50 + PRIVATE extern void ULtodd ANSI((ULong*, ULong*, Long, int));
51 + PRIVATE extern void ULtoQ ANSI((ULong*, ULong*, Long, int));
52 + PRIVATE extern void ULtox ANSI((UShort*, ULong*, Long, int));
53 + PRIVATE extern void ULtoxL ANSI((ULong*, ULong*, Long, int));
54 + PRIVATE extern ULong any_on ANSI((Bigint*, int));
55 + PRIVATE extern double b2d ANSI((Bigint*, int*));
56 + PRIVATE extern int cmp ANSI((Bigint*, Bigint*));
57 + PRIVATE extern void copybits ANSI((ULong*, int, Bigint*));
58 + PRIVATE extern Bigint *d2b ANSI((double, int*, int* MTd));
59 + PRIVATE extern void decrement ANSI((Bigint*));
60 + PRIVATE extern Bigint *diff ANSI((Bigint*, Bigint* MTd));
61 + PRIVATE extern char *dtoa ANSI((double d, int mode, int ndigits,
62 int *decpt, int *sign, char **rve));
63 - extern char *g__fmt ANSI((char*, char*, char*, int, ULong, size_t));
64 - extern int gethex ANSI((CONST char**, CONST FPI*, Long*, Bigint**, int MTd));
65 - /* extern void hexdig_init ANSI((Void)); */
66 - extern int hexnan ANSI((CONST char**, CONST FPI*, ULong*));
67 - extern int hi0bits_D2A ANSI((ULong));
68 - extern Bigint *i2b ANSI((int MTd));
69 - extern Bigint *increment ANSI((Bigint* MTd));
70 - extern int lo0bits ANSI((ULong*));
71 - extern Bigint *lshift ANSI((Bigint*, int MTd));
72 - extern int match ANSI((CONST char**, char*));
73 - extern Bigint *mult ANSI((Bigint*, Bigint* MTd));
74 - extern Bigint *multadd ANSI((Bigint*, int, int MTd));
75 - extern char *nrv_alloc ANSI((char*, char **, int MTd));
76 - extern Bigint *pow5mult ANSI((Bigint*, int MTd));
77 - extern int quorem ANSI((Bigint*, Bigint*));
78 - extern double ratio ANSI((Bigint*, Bigint*));
79 - extern void rshift ANSI((Bigint*, int));
80 - extern char *rv_alloc ANSI((int MTd));
81 - extern Bigint *s2b ANSI((CONST char*, int, int, ULong, int MTd));
82 - extern Bigint *set_ones ANSI((Bigint*, int MTd));
83 - extern char *strcp ANSI((char*, const char*));
84 - extern int strtoIg ANSI((CONST char*, char**, CONST FPI*, Long*, Bigint**, int*));
85 - extern double strtod ANSI((const char *s00, char **se));
86 - extern Bigint *sum ANSI((Bigint*, Bigint* MTd));
87 - extern int trailz ANSI((Bigint*));
88 - extern double ulp ANSI((U*));
89 + PRIVATE extern char *g__fmt ANSI((char*, char*, char*, int, ULong, size_t));
90 + PRIVATE extern int gethex ANSI((CONST char**, CONST FPI*, Long*, Bigint**, int MTd));
91 + /* PRIVATE extern void hexdig_init ANSI((Void)); */
92 + PRIVATE extern int hexnan ANSI((CONST char**, CONST FPI*, ULong*));
93 + PRIVATE extern int hi0bits_D2A ANSI((ULong));
94 + PRIVATE extern Bigint *i2b ANSI((int MTd));
95 + PRIVATE extern Bigint *increment ANSI((Bigint* MTd));
96 + PRIVATE extern int lo0bits ANSI((ULong*));
97 + PRIVATE extern Bigint *lshift ANSI((Bigint*, int MTd));
98 + PRIVATE extern int match ANSI((CONST char**, char*));
99 + PRIVATE extern Bigint *mult ANSI((Bigint*, Bigint* MTd));
100 + PRIVATE extern Bigint *multadd ANSI((Bigint*, int, int MTd));
101 + PRIVATE extern char *nrv_alloc ANSI((char*, char **, int MTd));
102 + PRIVATE extern Bigint *pow5mult ANSI((Bigint*, int MTd));
103 + PRIVATE extern int quorem ANSI((Bigint*, Bigint*));
104 + PRIVATE extern double ratio ANSI((Bigint*, Bigint*));
105 + PRIVATE extern void rshift ANSI((Bigint*, int));
106 + PRIVATE extern char *rv_alloc ANSI((int MTd));
107 + PRIVATE extern Bigint *s2b ANSI((CONST char*, int, int, ULong, int MTd));
108 + PRIVATE extern Bigint *set_ones ANSI((Bigint*, int MTd));
109 + PRIVATE extern char *strcp ANSI((char*, const char*));
110 + PRIVATE extern int strtoIg ANSI((CONST char*, char**, CONST FPI*, Long*, Bigint**, int*));
111 + PRIVATE extern double strtod ANSI((const char *s00, char **se));
112 + PRIVATE extern Bigint *sum ANSI((Bigint*, Bigint* MTd));
113 + PRIVATE extern int trailz ANSI((Bigint*));
114 + PRIVATE extern double ulp ANSI((U*));
115
116 #ifdef __cplusplus
117 }