diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-31 15:29:58 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-31 15:29:58 +0200 |
| commit | d1e0e1480b0210a6a5cfff7bc8be2bfea298a95b (patch) | |
| tree | 10012e7856220cfaf4ab1f30d7681354236337a8 /gcc/ada/debug.adb | |
| parent | fce547639dcebba692c4c864287cb371360a6661 (diff) | |
| download | gcc-d1e0e1480b0210a6a5cfff7bc8be2bfea298a95b.zip gcc-d1e0e1480b0210a6a5cfff7bc8be2bfea298a95b.tar.gz gcc-d1e0e1480b0210a6a5cfff7bc8be2bfea298a95b.tar.bz2 | |
[multiple changes]
2014-07-31 Pascal Obry <obry@adacore.com>
* a-stream.ads (Stream_Element_Offset): Now a signed 64bit type.
* i-cstrea.ads, s-crtl.ads (fseek64): Offset is always a 64bit value.
(ftell64): Always returns a 64bit value.
* cstreams.c (int64): New definition.
(_FILE_OFFSET_BITS): Set to 64 to enable 64bit offset support.
(__gnat_ftell64): Always returns a 64bit value. The implemenation now
uses ftello() on UNIX.
(__gnat_fseek64): Offset is always a 64bit value. The
implementation now uses fseeko() on UNIX.
* a-ststio.adb, s-direio.adb (Set_Position): Simplify code,
always use fseek64 to set the offset.
(Size): Simplify code, always use fseek64/ftell64.
* s-direio.ads (Count): Now an int64.
* g-socket.ads (Vector_Element): Adjust definition for Length
to be a size_t. This matches the C definition and avoid using
a 64bit integer on 32bit platforms now that Count is always 64bit.
* g-socthi-mingw.adb (Ada.Streams): Removed as not used anymore.
(C_Recvmsg): Change some conversion to account for change in
Vector_Element.
(C_Sendmsg): Likewise.
2014-07-31 Robert Dewar <dewar@adacore.com>
* cstand.adb (Create_Standard): Remove handling of -gnatdm flag.
* debug.adb: Remove documentation of -gnatdm flag.
* gnat1drv.adb (Adjust_Global_Switches): Remove handling of
-gnatdm flag.
From-SVN: r213365
Diffstat (limited to 'gcc/ada/debug.adb')
| -rw-r--r-- | gcc/ada/debug.adb | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/gcc/ada/debug.adb b/gcc/ada/debug.adb index 02f8d1f..9bf4faf 100644 --- a/gcc/ada/debug.adb +++ b/gcc/ada/debug.adb @@ -49,7 +49,7 @@ package body Debug is -- dj Suppress "junk null check" for access parameter values -- dk Generate GNATBUG message on abort, even if previous errors -- dl Generate unit load trace messages - -- dm Allow VMS features even if not OpenVMS version + -- dm -- dn Generate messages for node/list allocation -- do Print source from tree (original code only) -- dp Generate messages for parser scope stack push/pops @@ -281,14 +281,6 @@ package body Debug is -- generated each time a request is made to the library manager to -- load a new unit. - -- dm Some features are permitted only in OpenVMS ports of GNAT (e.g. - -- the specification of passing by descriptor). Normally any use - -- of these features will be flagged as an error, but this debug - -- flag allows acceptance of these features in non OpenVMS ports. - -- Of course they may not have any useful effect, and in particular - -- attempting to generate code with this flag set may blow up. - -- The flag also forces the use of 64-bits for Long_Integer. - -- dn Generate messages for node/list allocation. Each time a node or -- list header is allocated, a line of output is generated. Certain -- other basic tree operations also cause a line of output to be |