diff options
| -rw-r--r-- | gcc/ada/gnat1drv.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb index 3afe801..40f9228 100644 --- a/gcc/ada/gnat1drv.adb +++ b/gcc/ada/gnat1drv.adb @@ -565,6 +565,10 @@ procedure Gnat1drv is Tagged_Type_Expansion := False; + -- Force the use of "error:" prefix for error messages + + Unique_Error_Tag := True; + -- Detect that the runtime library support for floating-point numbers -- may not be compatible with SPARK analysis of IEEE-754 floats. |