diff options
Diffstat (limited to 'gcc/ada/par-ch11.adb')
-rw-r--r-- | gcc/ada/par-ch11.adb | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/gcc/ada/par-ch11.adb b/gcc/ada/par-ch11.adb index 468ba03a..63f0c6e 100644 --- a/gcc/ada/par-ch11.adb +++ b/gcc/ada/par-ch11.adb @@ -227,10 +227,7 @@ package body Ch11 is end if; if Token = Tok_With then - if Ada_Version < Ada_2005 then - Error_Msg_SC ("string expression in raise is Ada 2005 extension"); - Error_Msg_SC ("\unit must be compiled with -gnat05 switch"); - end if; + Error_Msg_Ada_2005_Extension ("string expression in raise"); Scan; -- past WITH Set_Expression (Raise_Node, P_Expression); |