summaryrefslogtreecommitdiff
path: root/gcc/ada/switch-c.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/switch-c.ads')
-rw-r--r--gcc/ada/switch-c.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/switch-c.ads b/gcc/ada/switch-c.ads
index 126183e6ca6..84d8812ea47 100644
--- a/gcc/ada/switch-c.ads
+++ b/gcc/ada/switch-c.ads
@@ -33,7 +33,7 @@ package Switch.C is
procedure Scan_Front_End_Switches
(Switch_Chars : String;
- Arg_Rank : Pos);
+ Arg_Rank : Positive);
-- Procedures to scan out front end switches stored in the given string.
-- The first character is known to be a valid switch character, and there
-- are no blanks or other switch terminator characters in the string, so