aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2020-08-13 18:19:49 +0200
committerPierre-Marie de Rodat <derodat@adacore.com>2020-10-22 08:11:20 -0400
commit4a11d43f15368d59dcbe424b047dc8029e4e98c5 (patch)
tree7dfe499f3932f30acda29cfbbf2979f3b744b8ff /gcc/ada
parentc44885927186c7ab498618c0e6173d6ef0d3b633 (diff)
downloadgcc-4a11d43f15368d59dcbe424b047dc8029e4e98c5.zip
gcc-4a11d43f15368d59dcbe424b047dc8029e4e98c5.tar.gz
gcc-4a11d43f15368d59dcbe424b047dc8029e4e98c5.tar.bz2
[Ada] Fix oversight in Eval_Attribute for Bit_Position
gcc/ada/ * sem_attr.adb (Eval_Attribute): Fix oversight for Bit_Position.
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/sem_attr.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb
index fcb04a2..9e7699f 100644
--- a/gcc/ada/sem_attr.adb
+++ b/gcc/ada/sem_attr.adb
@@ -7914,7 +7914,7 @@ package body Sem_Attr is
if Known_Static_Component_Bit_Offset (CE) then
Compile_Time_Known_Attribute
- (N, Component_Bit_Offset (Entity (P)));
+ (N, Component_Bit_Offset (CE));
else
Check_Expressions;
end if;