[Ada] Merge duplicated processing for gnatmake -u and -U switches
gcc/ada/ * make.adb (Scan_Make_Arg): Merge ELSIF branches for -u and -U.
This commit is contained in:
parent
47c2b77ffb
commit
ea89e1c31e
@ -4697,19 +4697,9 @@ package body Make is
|
||||
pragma Assert (Argv'Last = 2);
|
||||
Minimal_Recompilation := True;
|
||||
|
||||
-- -u
|
||||
-- -u and -U (they are differentiated elsewhere)
|
||||
|
||||
elsif Argv (2) = 'u' and then Argv'Last = 2 then
|
||||
Unique_Compile := True;
|
||||
Compile_Only := True;
|
||||
Do_Bind_Step := False;
|
||||
Do_Link_Step := False;
|
||||
|
||||
-- -U
|
||||
|
||||
elsif Argv (2) = 'U'
|
||||
and then Argv'Last = 2
|
||||
then
|
||||
elsif Argv (2) in 'u' | 'U' and then Argv'Last = 2 then
|
||||
Unique_Compile := True;
|
||||
Compile_Only := True;
|
||||
Do_Bind_Step := False;
|
||||
|
Loading…
Reference in New Issue
Block a user