diff options
Diffstat (limited to 'gcc/ada/exp_ch2.adb')
| -rw-r--r-- | gcc/ada/exp_ch2.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/exp_ch2.adb b/gcc/ada/exp_ch2.adb index 06a276b..edcb91c 100644 --- a/gcc/ada/exp_ch2.adb +++ b/gcc/ada/exp_ch2.adb @@ -464,9 +464,9 @@ package body Exp_Ch2 is -- disable if either variable or its type have sync disabled. else - Set := (not Atomic_Synchronization_Disabled (E)) + Set := not Atomic_Synchronization_Disabled (E) and then - (not Atomic_Synchronization_Disabled (Etype (E))); + not Atomic_Synchronization_Disabled (Etype (E)); end if; -- Set flag if required |