Differences From Artifact [e608f32fd8]:

• File generic/tclStrToD.c — part of check-in [f1709a0cfe] at 2019-06-15 22:30:59 on branch core-8-5-branch — Use mp_init_set() in stead of mp_init_set_int() when the constant is sufficiently small. This is slightly better optimized. (user: jan.nijtmans size: 133556)

To Artifact [881b81a65a]:

• File generic/tclStrToD.c — part of check-in [a4348251d8] at 2019-12-22 23:48:00 on branch bug-1de6b0629e — Assign a double literal to a double variable. No point in requiring conversion. (user: dgp size: 133558)

1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660

     */

    if (numSigDigs+exponent-1 > maxDigits) {
	retval = HUGE_VAL;
	goto returnValue;
    }
    if (numSigDigs+exponent-1 < minDigits) {
	retval = 0;
	goto returnValue;
    }

    /*
     * Develop a first approximation to the significand. It is tempting simply
     * to force bignum to double, but that will overflow on input numbers like
     * 1.[string repeat 0 1000]1; while this is a not terribly likely

|

1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660

     */

    if (numSigDigs+exponent-1 > maxDigits) {
	retval = HUGE_VAL;
	goto returnValue;
    }
    if (numSigDigs+exponent-1 < minDigits) {
	retval = 0.0;
	goto returnValue;
    }

    /*
     * Develop a first approximation to the significand. It is tempting simply
     * to force bignum to double, but that will overflow on input numbers like
     * 1.[string repeat 0 1000]1; while this is a not terribly likely