aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/errout.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/errout.adb')
-rw-r--r--gcc/ada/errout.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/errout.adb b/gcc/ada/errout.adb
index ac880ec..8848289 100644
--- a/gcc/ada/errout.adb
+++ b/gcc/ada/errout.adb
@@ -2849,10 +2849,10 @@ package body Errout is
elsif Msg = "size for& too small, minimum allowed is ^" then
- -- Suppress "size too small" errors in CodePeer mode and ALFA mode,
+ -- Suppress "size too small" errors in CodePeer mode and Alfa mode,
-- since pragma Pack is also ignored in these configurations.
- if CodePeer_Mode or ALFA_Mode then
+ if CodePeer_Mode or Alfa_Mode then
return True;
-- When a size is wrong for a frozen type there is no explicit size