aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/debug.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/debug.adb')
-rw-r--r--gcc/ada/debug.adb10
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