diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/sem_prag.adb | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c614f8f..7b33fc9 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2004-03-19 Laurent GUERBY <laurent@guerby.net> + + * sem_prag.adb (Suppress_Unsuppress_Echeck): use loop instead of + aggregate, allows bootstrap from 3.3 on powerpc-darwin. + 2004-03-18 Richard Kenner <kenner@vlsi1.ultra.nyu.edu> * ada-tree.h (TYPE_LEFT_JUSTIFIED_MODULAR_P): Add checking. diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index 3d718d7..62eb47a 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -3441,7 +3441,9 @@ package body Sem_Prag is -- suppress check for any check id value. if C = All_Checks then - Scope_Suppress := (others => Suppress_Case); + for J in Scope_Suppress'Range loop + Scope_Suppress (J) := Suppress_Case; + end loop; else Scope_Suppress (C) := Suppress_Case; end if; |