diff options
Diffstat (limited to 'gcc/ada/exp_ch11.adb')
-rw-r--r-- | gcc/ada/exp_ch11.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/gcc/ada/exp_ch11.adb b/gcc/ada/exp_ch11.adb index 06d8e7c0c00..3a5381448c2 100644 --- a/gcc/ada/exp_ch11.adb +++ b/gcc/ada/exp_ch11.adb @@ -730,7 +730,6 @@ package body Exp_Ch11 is end; end if; - -- If an exception occurrence is present, then we must declare it -- and initialize it from the value stored in the TSD @@ -1175,7 +1174,6 @@ package body Exp_Ch11 is Name_Buffer (Name_Len) := ASCII.NUL; end if; - if Opt.Exception_Locations_Suppressed then Name_Len := 0; end if; |