diff options
Diffstat (limited to 'src/vhdl/translate/trans.ads')
| -rw-r--r-- | src/vhdl/translate/trans.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans.ads b/src/vhdl/translate/trans.ads index adc4a4712..cc74d46b5 100644 --- a/src/vhdl/translate/trans.ads +++ b/src/vhdl/translate/trans.ads @@ -324,6 +324,9 @@ package Trans is -- before being set. procedure Clear_Scope (Scope : in out Var_Scope_Type); + -- True if SCOPE is a null-scope (eg. was cleared). + function Is_Null (Scope : Var_Scope_Type) return Boolean; + -- Reset the identifier. type Id_Mark_Type is limited private; type Local_Identifier_Type is private; |