diff options
author | Tristan Gingold | 2015-05-23 08:01:30 +0200 |
---|---|---|
committer | Tristan Gingold | 2015-05-23 08:01:30 +0200 |
commit | b8a48a6144a988904867fb044fbe2cb9f7d2750a (patch) | |
tree | 1ad4dd9eb9d685e4d86e734291bdcda94b68f7a6 /src/vhdl/sem_names.ads | |
parent | 6d809ee2e64d5033b62db219f86707e30babe381 (diff) | |
download | ghdl-b8a48a6144a988904867fb044fbe2cb9f7d2750a.tar.gz ghdl-b8a48a6144a988904867fb044fbe2cb9f7d2750a.tar.bz2 ghdl-b8a48a6144a988904867fb044fbe2cb9f7d2750a.zip |
Preliminary work to support external names (parse, semantic)
Diffstat (limited to 'src/vhdl/sem_names.ads')
-rw-r--r-- | src/vhdl/sem_names.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/sem_names.ads b/src/vhdl/sem_names.ads index 3bc8530..3ce4acf 100644 --- a/src/vhdl/sem_names.ads +++ b/src/vhdl/sem_names.ads @@ -151,6 +151,9 @@ package Sem_Names is -- Like Sem_Denoting_Name but expect a terminal name. function Sem_Terminal_Name (Name : Iir) return Iir; + -- Analyze an external name. + procedure Sem_External_Name (Name : Iir); + -- Emit an error for NAME that doesn't match its class CLASS_NAME. procedure Error_Class_Match (Name : Iir; Class_Name : String); |