diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/g-comlin.ads | 27 |
2 files changed, 20 insertions, 11 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index b868744..e23cb12d 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2008-08-20 Arnaud Charlet <charlet@adacore.com> + + * g-comlin.ads: Update comments. + 2008-08-20 Ed Schonberg <schonberg@adacore.com> * sem_ch8.adb (Analyze_Subprogram_Renaming): Inherit Is_Imported flag. diff --git a/gcc/ada/g-comlin.ads b/gcc/ada/g-comlin.ads index 41cdfb8..12a9888 100644 --- a/gcc/ada/g-comlin.ads +++ b/gcc/ada/g-comlin.ads @@ -576,11 +576,12 @@ package GNAT.Command_Line is -- This function can be used to reset Cmd by passing an empty string. procedure Add_Switch - (Cmd : in out Command_Line; - Switch : String; - Parameter : String := ""; - Separator : Character := ' '; - Section : String := ""); + (Cmd : in out Command_Line; + Switch : String; + Parameter : String := ""; + Separator : Character := ' '; + Section : String := ""; + Add_Before : Boolean := False); -- Add a new switch to the command line, and combine/group it with existing -- switches if possible. Nothing is done if the switch already exists with -- the same parameter. @@ -608,14 +609,18 @@ package GNAT.Command_Line is -- the switch is correctly placed in the command line, and the section -- added if not already present. For example, to add the -g switch into the -- -cargs section, you need to call (Cmd, "-g", Section => "-cargs") + -- + -- Add_Before allows insertion of the switch at the begining of the command + -- line. procedure Add_Switch - (Cmd : in out Command_Line; - Switch : String; - Parameter : String := ""; - Separator : Character := ' '; - Section : String := ""; - Success : out Boolean); + (Cmd : in out Command_Line; + Switch : String; + Parameter : String := ""; + Separator : Character := ' '; + Section : String := ""; + Add_Before : Boolean := False; + Success : out Boolean); -- Same as above, returning the status of -- the operation |