aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/exp_util.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb
index da5e849..f6d91ca 100644
--- a/gcc/ada/exp_util.adb
+++ b/gcc/ada/exp_util.adb
@@ -9521,7 +9521,7 @@ package body Exp_Util is
return True;
else
- case Nkind (E) is
+ case Nkind (Exp) is
-- The tag of a component or an aggregate of a specific tagged
-- type T identifies T.