diff options
Diffstat (limited to 'gcc/ada/g-comlin.ads')
-rw-r--r-- | gcc/ada/g-comlin.ads | 10 |
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 |