diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 10:41:25 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 10:41:25 +0000 |
| commit | 60ca8da9bac8217dd8cf253418650878c47b8af5 (patch) | |
| tree | e668c89aa3f9087dd5b3d22630f97376345fb69c /gcc/ada/g-comlin.adb | |
| parent | 2dcc34c1a6d129503d5c0ea6b1af7dd54bb5dc14 (diff) | |
| download | gcc-60ca8da9bac8217dd8cf253418650878c47b8af5.tar.gz | |
2009-04-20 Gary Dismukes <dismukes@adacore.com>
* osint-c.ads, osint-c.adb (Get_Object_Output_File_Name): New function
to return the object file name saved by Set_Object_Output_File_Name.
2009-04-20 Emmanuel Briot <briot@adacore.com>
* g-comlin.adb (Initialize_Option_Scan): Fix initialization of parsers
for the standard command line, when argc has been modified since the
start of the application.
2009-04-20 Thomas Quinot <quinot@adacore.com>
* socket.c (__gnat_inet_pton, Windows case): Adjust return value.
WSAStringToAddress returns 0 for success and SOCKET_ERROR for failure.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146395 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-comlin.adb')
| -rw-r--r-- | gcc/ada/g-comlin.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/g-comlin.adb b/gcc/ada/g-comlin.adb index 8ee4f427dfb..b0106226252 100644 --- a/gcc/ada/g-comlin.adb +++ b/gcc/ada/g-comlin.adb @@ -851,8 +851,9 @@ package body GNAT.Command_Line is if Command_Line = null then Parser := new Opt_Parser_Data (CL.Argument_Count); - Initialize_Option_Scan - (Switch_Char => Switch_Char, + Internal_Initialize_Option_Scan + (Parser => Parser, + Switch_Char => Switch_Char, Stop_At_First_Non_Switch => Stop_At_First_Non_Switch, Section_Delimiters => Section_Delimiters); else |