From 0d8f155d3c9e5413a42984f0f290c71ab89a71ba Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 17 Mar 2021 18:44:41 +0100 Subject: std_names: add Name_Loc --- src/std_names.adb | 1 + src/std_names.ads | 3 ++- 2 files changed, 3 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/std_names.adb b/src/std_names.adb index df2e399ce..b9eeea05e 100644 --- a/src/std_names.adb +++ b/src/std_names.adb @@ -684,6 +684,7 @@ package body Std_Names is Def ("anyconst", Name_Anyconst); Def ("anyseq", Name_Anyseq); Def ("gclk", Name_Gclk); + Def ("loc", Name_Loc); -- Verilog directives Def ("define", Name_Define); diff --git a/src/std_names.ads b/src/std_names.ads index bd6429bff..46b7542df 100644 --- a/src/std_names.ads +++ b/src/std_names.ads @@ -769,7 +769,8 @@ package Std_Names is Name_Anyconst : constant Name_Id := Name_First_Synthesis + 002; Name_Anyseq : constant Name_Id := Name_First_Synthesis + 003; Name_Gclk : constant Name_Id := Name_First_Synthesis + 004; - Name_Last_Synthesis : constant Name_Id := Name_Gclk; + Name_Loc : constant Name_Id := Name_First_Synthesis + 005; + Name_Last_Synthesis : constant Name_Id := Name_Loc; -- Verilog Directives. Name_First_Directive : constant Name_Id := Name_Last_Synthesis + 1; -- cgit v1.2.3