mirror of
https://github.com/crosstool-ng/crosstool-ng.git
synced 2024-12-27 00:11:05 +00:00
39 lines
1.1 KiB
Diff
39 lines
1.1 KiB
Diff
|
Original patch from http://gmplib.org/patches/mpf_set_str.c.diff
|
||
|
Re-diffed to match crosstool-NG conventions.
|
||
|
|
||
|
diff -dur gmp-4.2.2.orig/mpf/set_str.c gmp-4.2.2/mpf/set_str.c
|
||
|
--- gmp-4.2.2.orig/mpf/set_str.c 2007-08-30 20:31:40.000000000 +0200
|
||
|
+++ gmp-4.2.2/mpf/set_str.c 2008-01-28 23:05:29.000000000 +0100
|
||
|
@@ -271,8 +271,29 @@
|
||
|
}
|
||
|
|
||
|
if (expptr != 0)
|
||
|
- /* FIXME: Should do some error checking here. */
|
||
|
- exp_in_base = strtol (expptr, (char **) 0, exp_base);
|
||
|
+ {
|
||
|
+ /* Scan and convert the exponent, in base exp_base. */
|
||
|
+ long dig, neg = -(long) ('-' == expptr[0]);
|
||
|
+ expptr -= neg; /* conditional increment */
|
||
|
+ c = (unsigned char) *expptr++;
|
||
|
+ dig = digit_value[c];
|
||
|
+ if (dig >= exp_base)
|
||
|
+ {
|
||
|
+ TMP_FREE;
|
||
|
+ return -1;
|
||
|
+ }
|
||
|
+ exp_in_base = dig;
|
||
|
+ c = (unsigned char) *expptr++;
|
||
|
+ dig = digit_value[c];
|
||
|
+ while (dig < exp_base)
|
||
|
+ {
|
||
|
+ exp_in_base = exp_in_base * exp_base;
|
||
|
+ exp_in_base += dig;
|
||
|
+ c = (unsigned char) *expptr++;
|
||
|
+ dig = digit_value[c];
|
||
|
+ }
|
||
|
+ exp_in_base = (exp_in_base ^ neg) - neg; /* conditional negation */
|
||
|
+ }
|
||
|
else
|
||
|
exp_in_base = 0;
|
||
|
if (dotpos != 0)
|