parent
b993039f5b
commit
619a69500d
|
@ -6,20 +6,20 @@
|
|||
* gnatlink.adb (Gnatlink): Declare Object_File_Option_Ptr here...
|
||||
Declare Object_File_Option string constant and Using_GNU_response_file
|
||||
boolean constant.
|
||||
(Process_Binder_File): ...instead of here. Delete Using_GNU_Linker,
|
||||
Opening and Closing local variables. Do not handle the GNU linker
|
||||
(Process_Binder_File): ...instead of here. Delete Using_GNU_Linker,
|
||||
Opening and Closing local variables. Do not handle the GNU linker
|
||||
specially.
|
||||
(Write_RF): New procedure to write into the response file. Escape some
|
||||
characters if a GNU response file is used. Keep track of error status.
|
||||
Invoke Write_RF to write into the response file. Delete the file only
|
||||
(Write_RF): New procedure to write into the response file. Escape some
|
||||
characters if a GNU response file is used. Keep track of error status.
|
||||
Invoke Write_RF to write into the response file. Delete the file only
|
||||
if the link was successful.
|
||||
* mlib-utl.adb: Do not `with' package System.
|
||||
(Gcc): Likewise. Declare Object_File_Option string constant and
|
||||
(Gcc): Likewise. Declare Object_File_Option string constant and
|
||||
Using_GNU_response_file boolean constant.
|
||||
(Write_RF): Take a string instead of address and length. Escape some
|
||||
(Write_RF): Take a string instead of address and length. Escape some
|
||||
characters if a GNU response file is used.
|
||||
Invoke Write_RF to write into the response file. Delete the file only
|
||||
if the link was successful. Do not warn if it cannot be deleted.
|
||||
Invoke Write_RF to write into the response file. Delete the file only
|
||||
if the link was successful. Do not warn if it cannot be deleted.
|
||||
|
||||
2012-05-20 Eric Botcazou <ebotcazou@adacore.com>
|
||||
|
||||
|
|
Loading…
Reference in New Issue