summaryrefslogtreecommitdiff
path: root/gcc/ada/debug.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2007-09-26 10:42:59 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2007-09-26 10:42:59 +0000
commit46ed552ee3a3aaa6139e90e3aaefe50397cf108a (patch)
tree9f6affc91257fbbff74071b18fe45d81fa90834e /gcc/ada/debug.adb
parentfdd18a7c94f4cbb499dafb7a1a1467fe861d55d9 (diff)
downloadgcc-46ed552ee3a3aaa6139e90e3aaefe50397cf108a.tar.gz
2007-09-26 Robert Dewar <dewar@adacore.com>
* exp_ch5.adb: Activate memmove type processing if debug flag d.s is set * debug.adb: Add d.s flag. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@128787 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/debug.adb')
-rw-r--r--gcc/ada/debug.adb7
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/debug.adb b/gcc/ada/debug.adb
index 8b3ff397301..363cc07907c 100644
--- a/gcc/ada/debug.adb
+++ b/gcc/ada/debug.adb
@@ -111,7 +111,7 @@ package body Debug is
-- d.p
-- d.q
-- d.r
- -- d.s
+ -- d.s Disable expansion of slice move, use memmove
-- d.t Disable static allocation of library level dispatch tables
-- d.u
-- d.v
@@ -514,6 +514,11 @@ package body Debug is
-- main source (this corresponds to a previous behavior of -gnatl and
-- is used for running the ACATS tests).
+ -- d.s Normally the compiler expands slice moves into loops if overlap
+ -- might be possible. This debug flag inhibits that expansion, and
+ -- the back end is expected to use an appropriate routine to handle
+ -- overlap, based on Forward_OK and Backwards_OK flags.
+
-- d.t The compiler has been modified (a fairly extensive modification)
-- to generate static dispatch tables for library level tagged types.
-- This debug switch disables this modification and reverts to the