[Bug ada/107391] internal error on decimal literal with huge exponent

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=107391

--- Comment #3 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Eric Botcazou <ebotcazou@gcc.gnu.org>:

https://gcc.gnu.org/g:a3fae6393c63c09cfb57f03a3a8faf5fc33e0961

commit r16-8742-ga3fae6393c63c09cfb57f03a3a8faf5fc33e0961
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Fri Apr 17 22:22:07 2026 +0200

    Ada: Fix internal error on decimal literal with huge exponent

    This is a serious contender for the smallest chunk of code still crashing
    the compiler after three decades.

    gcc/ada/
            PR ada/107391
            * urealp.adb (Decimal_Exponent_Hi): Check that the denominator is
            in range before invoking UI_To_Int on it, and cope with failure.
            (Decimal_Exponent_Lo): Likewise.

    gcc/testsuite/
            * gnat.dg/specs/float_literal1.ads: New test.