diff options
Diffstat (limited to 'gcc/ada/prepcomp.adb')
| -rw-r--r-- | gcc/ada/prepcomp.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/prepcomp.adb b/gcc/ada/prepcomp.adb index ea7760a..35dd4cb 100644 --- a/gcc/ada/prepcomp.adb +++ b/gcc/ada/prepcomp.adb @@ -545,7 +545,7 @@ package body Prepcomp is if Total_Errors_Detected > T then Errout.Finalize (Last_Call => True); - Errout.Output_Messages; + Errout.Output_Messages (E_Fatal); Fail ("errors found in preprocessing data file """ & Get_Name_String (N) & """"); end if; @@ -668,7 +668,7 @@ package body Prepcomp is if T /= Total_Errors_Detected then Errout.Finalize (Last_Call => True); - Errout.Output_Messages; + Errout.Output_Messages (E_Fatal); Fail ("errors found in definition file """ & Get_Name_String (N) & """"); |