diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2021-03-26 10:53:57 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-06-21 06:45:05 -0400 |
| commit | 08c9ef089fdbe19e648016db7cb4c9fdd665bccc (patch) | |
| tree | d90f183fa107a0f6942f4b86f9061cc2a09f3248 /gcc/gimplify.c | |
| parent | 05447313c9acb24e0fad6305ad333077707de9ba (diff) | |
| download | gcc-08c9ef089fdbe19e648016db7cb4c9fdd665bccc.zip gcc-08c9ef089fdbe19e648016db7cb4c9fdd665bccc.tar.gz gcc-08c9ef089fdbe19e648016db7cb4c9fdd665bccc.tar.bz2 | |
[Ada] Fix invalid JSON real numbers generated with -gnatRj
gcc/ada/
* urealp.ads (UR_Write_To_JSON): Declare.
* urealp.adb (Decimal_Exponent_Hi): Treat numbers in base 10
specially and rewrite handling of numbers in other bases.
(Decimal_Exponent_Lo): Likewise.
(Normalize): Minor tweak.
(UR_Write_To_JSON): New wrapper procedure around UR_Write.
* repinfo.adb (List_Type_Info): When the output is to JSON, call
UR_Write_To_JSON instead of UR_Write.
Diffstat (limited to 'gcc/gimplify.c')
0 files changed, 0 insertions, 0 deletions