aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/par-ch11.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/par-ch11.adb')
-rw-r--r--gcc/ada/par-ch11.adb6
1 files changed, 1 insertions, 5 deletions
diff --git a/gcc/ada/par-ch11.adb b/gcc/ada/par-ch11.adb
index f0537f2..61df3ee 100644
--- a/gcc/ada/par-ch11.adb
+++ b/gcc/ada/par-ch11.adb
@@ -213,11 +213,7 @@ package body Ch11 is
Raise_Node : Node_Id;
begin
- if Ada_Version < Ada_2012 then
- Error_Msg_SC ("raise expression is an Ada 2012 feature");
- Error_Msg_SC ("\|unit must be compiled with -gnat2012 switch");
- end if;
-
+ Error_Msg_Ada_2012_Feature ("raise expression", Token_Ptr);
Raise_Node := New_Node (N_Raise_Expression, Token_Ptr);
Scan; -- past RAISE