diff options
Diffstat (limited to 'gcc/ada/par-prag.adb')
| -rw-r--r-- | gcc/ada/par-prag.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/par-prag.adb b/gcc/ada/par-prag.adb index 259d15f..265f187 100644 --- a/gcc/ada/par-prag.adb +++ b/gcc/ada/par-prag.adb @@ -169,7 +169,7 @@ function Prag (Pragma_Node : Node_Id; Semi : Source_Ptr) return Node_Id is begin if Nkind (Expression (Arg)) /= N_Identifier - or else not Nam_In (Chars (Argx), Name_On, Name_Off) + or else Chars (Argx) not in Name_On | Name_Off then Error_Msg_Name_2 := Name_On; Error_Msg_Name_3 := Name_Off; |