diff options
| author | Ronan Desplanques <desplanques@adacore.com> | 2024-10-14 10:15:11 +0200 |
|---|---|---|
| committer | Marc Poulhiès <dkm@gcc.gnu.org> | 2024-11-04 16:57:58 +0100 |
| commit | ecd8a5990f6ebec89fc2f8ba79a349c3258c662c (patch) | |
| tree | d05ed39e754331dd402c31061f674df08a68fe92 | |
| parent | 7c7a8d60881fb727ce8ed4685bc1f484834db110 (diff) | |
| download | gcc-ecd8a5990f6ebec89fc2f8ba79a349c3258c662c.zip gcc-ecd8a5990f6ebec89fc2f8ba79a349c3258c662c.tar.gz gcc-ecd8a5990f6ebec89fc2f8ba79a349c3258c662c.tar.bz2 | |
ada: Display message on reproducer generation failure
Before this patch, nothing was reported to the user when an exception
was raised during generation of a minimal reproducer. This patch fixes
this.
gcc/ada/ChangeLog:
* comperr.adb (Compiler_Abort): Display message in exception handler.
| -rw-r--r-- | gcc/ada/comperr.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/comperr.adb b/gcc/ada/comperr.adb index e411ddb..726f0cc 100644 --- a/gcc/ada/comperr.adb +++ b/gcc/ada/comperr.adb @@ -409,7 +409,8 @@ package body Comperr is Generate_Minimal_Reproducer; end if; exception - when others => null; + when others => + Write_Str ("failed to generate reproducer"); end; Write_Eol; |