Fix oversight in earlier change
authorEric Botcazou <ebotcazou@adacore.com>
Mon, 7 Dec 2020 09:34:31 +0000 (10:34 +0100)
committerEric Botcazou <ebotcazou@adacore.com>
Mon, 7 Dec 2020 09:34:31 +0000 (10:34 +0100)
gcc/ada/ChangeLog:
* gcc-interface/decl.c (gnat_to_gnu_entity) <Fixed_Point_Type>: Put
back the "else" unduly removed.

gcc/ada/gcc-interface/decl.c

index a0f17b1..7caca6a 100644 (file)
@@ -1764,6 +1764,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition)
        /* Use the arbitrary scale factor description.  Note that we support
           a Small_Value whose magnitude is larger than 64-bit even on 32-bit
           platforms, so we unconditionally use a (dummy) 128-bit type.  */
+       else
          {
            const Uint gnat_num = Norm_Num (gnat_small_value);
            const Uint gnat_den = Norm_Den (gnat_small_value);