aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/make.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/make.adb')
-rw-r--r--gcc/ada/make.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb
index 33611d3..69a996d 100644
--- a/gcc/ada/make.adb
+++ b/gcc/ada/make.adb
@@ -7825,7 +7825,7 @@ package body Make is
-- -vPx (verbosity of the parsing of the project files)
- elsif Argv (2 .. 3) = "vP" then
+ elsif Argv'Length >= 3 and then Argv (2 .. 3) = "vP" then
if Argv'Last /= 4 or else Argv (4) not in '0' .. '2' then
Make_Failed
("invalid verbosity level " & Argv (4 .. Argv'Last));