From: Eric Botcazou <ebotcazou@adacore.com>
Date: Mon, 7 Dec 2020 09:34:31 +0000 (+0100)
Subject: Fix oversight in earlier change
X-Git-Tag: basepoints/gcc-12~2441
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6fb8da750ff53faec52aaa6cda31fbc510219926;p=thirdparty%2Fgcc.git

Fix oversight in earlier change

gcc/ada/ChangeLog:
	* gcc-interface/decl.c (gnat_to_gnu_entity) <Fixed_Point_Type>: Put
	back the "else" unduly removed.
---

diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index a0f17b1aafcb..7caca6a6fb2c 100644
--- a/gcc/ada/gcc-interface/decl.c
+++ b/gcc/ada/gcc-interface/decl.c
@@ -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);