From d505b92ea2e75f9c8bfe029f6508408e74df4ae9 Mon Sep 17 00:00:00 2001
From: ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 4 Mar 2006 00:27:15 +0000
Subject: [PATCH] 	* uintp.adb (Num_Bits): Handle Uint_Int_First
 specially.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@111700 138bc75d-0d04-0410-961f-82ee72b054a4
---
 gcc/ada/ChangeLog | 5 +++++
 gcc/ada/uintp.adb | 5 ++++-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index d87a8d67251..cc1a4b2f628 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,9 +1,14 @@
+2006-03-03  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
+
+	* uintp.adb (Num_Bits): Handle Uint_Int_First specially.
+
 2006-03-02  Richard Sandiford  <richard@codesourcery.com>
 
 	* utils.c (create_var_decl): Use have_global_bss_p when deciding
 	whether to make the decl common.
 
 2006-02-20 Rafael Ávila de Espíndola <rafael.espindola@gmail.com>
+
 	* Make-lang.in (Ada): Remove
 	(.PHONY): Remove Ada
 
diff --git a/gcc/ada/uintp.adb b/gcc/ada/uintp.adb
index c9fbb03e675..d295eab459e 100644
--- a/gcc/ada/uintp.adb
+++ b/gcc/ada/uintp.adb
@@ -590,7 +590,10 @@ package body Uintp is
       Num  : Nat;
 
    begin
-      if UI_Is_In_Int_Range (Input) then
+      if Input = Uint_Int_First then
+         return Int'Size;
+
+      elsif UI_Is_In_Int_Range (Input) then
          Num := abs (UI_To_Int (Input));
          Bits := 0;
 
-- 
2.11.4.GIT