diff options
Diffstat (limited to 'gcc/ada/binde.adb')
| -rw-r--r-- | gcc/ada/binde.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/binde.adb b/gcc/ada/binde.adb index 101213c..fe262c0 100644 --- a/gcc/ada/binde.adb +++ b/gcc/ada/binde.adb @@ -1937,7 +1937,7 @@ package body Binde is Units.Table (U).Last_With loop if Withs.Table (W).Sfile /= No_File - and then (not Withs.Table (W).SAL_Interface) + and then not Withs.Table (W).SAL_Interface then -- Check for special case of withing a unit that does not -- exist any more. If the unit was completely missing we @@ -2793,7 +2793,7 @@ package body Binde is Units.Table (U).Last_With loop if Withs.Table (W).Sfile /= No_File - and then (not Withs.Table (W).SAL_Interface) + and then not Withs.Table (W).SAL_Interface then -- Check for special case of withing a unit that does not -- exist any more. |