[Ada] Refine type of a counter variable from Integer to Natural

gcc/ada/

	* pprint.adb (List_Name_Count): Change type from Integer to
	Natural.

diff --git a/gcc/ada/pprint.adb b/gcc/ada/pprint.adb
index 5091a862fe667a3507aa2d9b44ec16497a7bd41d..0360e94c0d8f2e323f2b0cd8f0becc32399cdb73 100644 (file)
--- a/gcc/ada/pprint.adb
+++ b/gcc/ada/pprint.adb
@@ -36,7 +36,7 @@ with Uintp;   use Uintp;
 
 package body Pprint is
 
-   List_Name_Count : Integer := 0;
+   List_Name_Count : Natural := 0;
    --  Counter used to prevent infinite recursion while computing name of
    --  complex expressions.