[Ada] Refine type of a multi unit index number

gcc/ada/

	* opt.ads (Multiple_Unit_Index): Refine type from Int to Nat.

diff --git a/gcc/ada/opt.ads b/gcc/ada/opt.ads
index f55e9c665e2da0a1330a47b2655b013c756a5e7c..6b32a962e29dc5cc604d428d705b5b7f8b768487 100644 (file)
--- a/gcc/ada/opt.ads
+++ b/gcc/ada/opt.ads
@@ -1135,7 +1135,7 @@ package Opt is
    --  make it easier to interface with back ends that implement C semantics.
    --  There is a section in Sinfo which describes the transformations made.
 
-   Multiple_Unit_Index : Int := 0;
+   Multiple_Unit_Index : Nat := 0;
    --  GNAT
    --  This is set non-zero if the current unit is being compiled in multiple
    --  unit per file mode, meaning that the current unit is selected from the