diff options
| author | Tristan Gingold <tgingold@free.fr> | 2014-12-26 06:26:25 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2014-12-26 06:26:25 +0100 |
| commit | cb0609778181832120ca7776dc4501b97d0ebbeb (patch) | |
| tree | dd63493909b1c7ba818d9c6d9ee252812d06eb29 /src/vhdl/ieee-vital_timing.adb | |
| parent | 523792edaef032f41ea8a0bb8273013ced2a9276 (diff) | |
| download | ghdl-cb0609778181832120ca7776dc4501b97d0ebbeb.tar.gz ghdl-cb0609778181832120ca7776dc4501b97d0ebbeb.tar.bz2 ghdl-cb0609778181832120ca7776dc4501b97d0ebbeb.zip | |
Rewrite sem_scopes tables for speed-up (and clarification).
Diffstat (limited to 'src/vhdl/ieee-vital_timing.adb')
| -rw-r--r-- | src/vhdl/ieee-vital_timing.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/ieee-vital_timing.adb b/src/vhdl/ieee-vital_timing.adb index 3b94e3e0b..90e1bda63 100644 --- a/src/vhdl/ieee-vital_timing.adb +++ b/src/vhdl/ieee-vital_timing.adb @@ -1289,7 +1289,7 @@ package body Ieee.Vital_Timing is end if; -- Check ports. - Name_Table.Assert_No_Infos; + Push_Interpretations; Open_Declarative_Region; Decl := Get_Port_Chain (Ent); while Decl /= Null_Iir loop @@ -1306,6 +1306,7 @@ package body Ieee.Vital_Timing is Decl := Get_Chain (Decl); end loop; Close_Declarative_Region; + Pop_Interpretations; end Check_Vital_Level0_Entity; -- Return TRUE if UNIT was decorated with attribute VITAL_Level0. |