diff options
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 e3c53dd..a045a7b 100644 --- a/gcc/ada/debug.adb +++ b/gcc/ada/debug.adb @@ -128,7 +128,7 @@ package body Debug is -- d.H GNSA mode for ASIS -- d.I Do not ignore enum representation clauses in CodePeer mode -- d.J Disable parallel SCIL generation mode - -- d.K + -- d.K Enable generation of contract-only procedures in CodePeer mode -- d.L Depend on back end for limited types in if and case expressions -- d.M Relaxed RM semantics -- d.N Add node to all entities @@ -646,6 +646,13 @@ package body Debug is -- done in parallel to speed processing. This switch disables this -- behavior. + -- d.K Enable generation of contract-only procedures in CodePeer mode and + -- report a warning on subprograms for which the contract-only body + -- cannot be built. Currently reported on subprograms defined in + -- nested package specs that have some formal (or return type) whose + -- type is a private type defined in some enclosing package and that + -- have pre/postconditions. + -- d.L Normally the front end generates special expansion for conditional -- expressions of a limited type. This debug flag removes this special -- case expansion, leaving it up to the back end to handle conditional |