diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-20 09:55:20 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-20 09:55:20 +0000 |
| commit | f0a120e16253542613cbbcad575157e1390afe79 (patch) | |
| tree | 53fa0a054c99c1ef2de2e792abb010e01281b34e /gcc/ada/debug.adb | |
| parent | d1cd139765481d2a4c9082b96ca83e9eae543ad6 (diff) | |
| download | gcc-f0a120e16253542613cbbcad575157e1390afe79.tar.gz | |
2015-10-20 Hristian Kirtchev <kirtchev@adacore.com>
* sem_prag.adb (Check_Usage): Update the calls to Usage_Error.
(Usage_Error): Remove formal parameter Item. Emit a clearer message
concerning a missing dependency item and place it on the related pragma.
2015-10-20 Bob Duff <duff@adacore.com>
* debug.adb, expander.adb: Implement -gnatd.B switch, which
triggers a bug box when an abort_statement is seen. This is
useful for testing Comperr.Compiler_Abort.
* gnat1drv.adb: Trigger bug box on all exceptions other than
Unrecoverable_Error.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@229032 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/debug.adb')
| -rw-r--r-- | gcc/ada/debug.adb | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/gcc/ada/debug.adb b/gcc/ada/debug.adb index a8e0ff4c022..2bc09db8710 100644 --- a/gcc/ada/debug.adb +++ b/gcc/ada/debug.adb @@ -119,7 +119,7 @@ package body Debug is -- d.z Restore previous support for frontend handling of Inline_Always -- d.A Read/write Aspect_Specifications hash table to tree - -- d.B + -- d.B Generate a bug box on abort_statement -- d.C Generate concatenation call, do not generate inline code -- d.D Disable errors on use of overriding keyword in Ada 95 mode -- d.E Turn selected errors into warnings @@ -595,6 +595,13 @@ package body Debug is -- for now, this is controlled by the debug flag d.A. The hash table -- is only written and read if this flag is set. + -- d.B Generate a bug box when we see an abort_statement, even though + -- there is no bug. Useful for testing Comperr.Compiler_Abort: write + -- some code containing an abort_statement, and compile it with + -- -gnatd.B. There is nothing special about abort_statements; it just + -- provides a way to control where the bug box is generated. See "when + -- N_Abort_Statement" in package body Expander. + -- d.C Generate call to System.Concat_n.Str_Concat_n routines in cases -- where we would normally generate inline concatenation code. |