diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-10-27 14:51:46 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-10-27 14:51:46 +0100 |
| commit | 76b84bf03f7a5c8d516690d043b69bc4d8288c04 (patch) | |
| tree | 39117f1ef2342c7a6d902bdfdeaa859e5d1c2f8c /gcc/ada/s-os_lib.adb | |
| parent | 0c0c6f49d575f70b8fbd64a5d033d65ee24f9ad2 (diff) | |
| download | gcc-76b84bf03f7a5c8d516690d043b69bc4d8288c04.zip gcc-76b84bf03f7a5c8d516690d043b69bc4d8288c04.tar.gz gcc-76b84bf03f7a5c8d516690d043b69bc4d8288c04.tar.bz2 | |
[multiple changes]
2009-10-27 Robert Dewar <dewar@adacore.com>
* s-os_lib.ads, s-os_lib.adb, prj-err.adb, makeutl.adb: Minor
reformatting.
2009-10-27 Ed Schonberg <schonberg@adacore.com>
* sem.util.ads, sem_util.adb (Denotes_Same_Object,
Denotes_Same_Prefix): New functions to detect overlap between actuals
that are not by-copy in a call, when one of them is in-out.
* sem_warn.ads, sem_warn.adb (Warn_On_Overlapping_Actuals): New
procedure, called on a subprogram call to warn when an in-out actual
that is not by-copy overlaps with another actual, thus leadind to
potentially dangerous aliasing in the body of the called subprogram.
Currently the warning is under control of the -gnatX switch.
* sem_res.adb (resolve_call): call Warn_On_Overlapping_Actuals.
From-SVN: r153594
Diffstat (limited to 'gcc/ada/s-os_lib.adb')
| -rwxr-xr-x | gcc/ada/s-os_lib.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/s-os_lib.adb b/gcc/ada/s-os_lib.adb index a3e51cd..f734136 100755 --- a/gcc/ada/s-os_lib.adb +++ b/gcc/ada/s-os_lib.adb @@ -77,13 +77,13 @@ package body System.OS_Lib is ----------------------- function Args_Length (Args : Argument_List) return Natural; - -- Returns total number of characters needed to create a string - -- of all Args terminated by ASCII.NUL characters + -- Returns total number of characters needed to create a string of all Args + -- terminated by ASCII.NUL characters. procedure Create_Temp_File_Internal - (FD : out File_Descriptor; - Name : out String_Access; - Stdout : Boolean); + (FD : out File_Descriptor; + Name : out String_Access; + Stdout : Boolean); -- Internal routine to implement two Create_Temp_File routines. If Stdout -- is set to True the created descriptor is stdout-compatible, otherwise -- it might not be depending on the OS (VMS is one example). The first two |