diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-11-06 20:45:56 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-11-06 20:45:56 +0100 |
| commit | c988ed8c1d6bfa36c85b27771f26a9e8f0bbeec0 (patch) | |
| tree | 9e9d8dd973a823a48f751abcc87b991cf71d6c50 /src/std_names.ads | |
| parent | 1984d2adb083153f03eb7775d956445772ca484f (diff) | |
| download | ghdl-c988ed8c1d6bfa36c85b27771f26a9e8f0bbeec0.tar.gz ghdl-c988ed8c1d6bfa36c85b27771f26a9e8f0bbeec0.tar.bz2 ghdl-c988ed8c1d6bfa36c85b27771f26a9e8f0bbeec0.zip | |
Preliminary support for tool directives.
Diffstat (limited to 'src/std_names.ads')
| -rw-r--r-- | src/std_names.ads | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/std_names.ads b/src/std_names.ads index bc144c13c..8ce3922ed 100644 --- a/src/std_names.ads +++ b/src/std_names.ads @@ -583,7 +583,12 @@ package Std_Names is Name_Include : constant Name_Id := Name_First_Directive + 03; Name_Timescale : constant Name_Id := Name_First_Directive + 04; Name_Undef : constant Name_Id := Name_First_Directive + 05; - Name_Last_Directive : constant Name_Id := Name_Undef; + Name_Protect : constant Name_Id := Name_First_Directive + 06; + Name_Begin_Protected : constant Name_Id := Name_First_Directive + 07; + Name_End_Protected : constant Name_Id := Name_First_Directive + 08; + Name_Key_Block : constant Name_Id := Name_First_Directive + 09; + Name_Data_Block : constant Name_Id := Name_First_Directive + 10; + Name_Last_Directive : constant Name_Id := Name_Data_Block; -- Verilog system tasks. Name_First_Systask : constant Name_Id := Name_Last_Directive + 1; |