diff options
Diffstat (limited to 'gcc/ada/checks.adb')
| -rw-r--r-- | gcc/ada/checks.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb index 61e1ad4fed9..f9cb0ba9553 100644 --- a/gcc/ada/checks.adb +++ b/gcc/ada/checks.adb @@ -2412,8 +2412,7 @@ package body Checks is begin Prag := Make_Pragma (Loc, - Pragma_Identifier => - Make_Identifier (Loc, Prag_Nam), + Chars => Prag_Nam, Pragma_Argument_Associations => New_List ( Make_Pragma_Argument_Association (Loc, Chars => Name_Check, |