summaryrefslogtreecommitdiff
path: root/gcc/ada/g-comlin.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/g-comlin.ads')
-rw-r--r--gcc/ada/g-comlin.ads10
1 files changed, 7 insertions, 3 deletions
diff --git a/gcc/ada/g-comlin.ads b/gcc/ada/g-comlin.ads
index f1b21637d1b..f19d7baea5b 100644
--- a/gcc/ada/g-comlin.ads
+++ b/gcc/ada/g-comlin.ads
@@ -703,9 +703,10 @@ package GNAT.Command_Line is
-- switch.
procedure Getopt
- (Config : Command_Line_Configuration;
- Callback : Switch_Handler := null;
- Parser : Opt_Parser := Command_Line_Parser);
+ (Config : Command_Line_Configuration;
+ Callback : Switch_Handler := null;
+ Parser : Opt_Parser := Command_Line_Parser;
+ Concatenate : Boolean := True);
-- Similar to the standard Getopt function.
-- For each switch found on the command line, this calls Callback, if the
-- switch is not handled automatically.
@@ -716,6 +717,9 @@ package GNAT.Command_Line is
-- variable). This function will in fact never call [Callback] if all
-- switches were handled automatically and there is nothing left to do.
--
+ -- The option Concatenate is identical to the one of the standard Getopt
+ -- function.
+ --
-- This procedure automatically adds -h and --help to the valid switches,
-- to display the help message and raises Exit_From_Command_Line.
-- If an invalid switch is specified on the command line, this procedure