diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-10-26 19:24:18 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-10-26 19:24:18 +0200 |
| commit | 1014234660d921a5dccb8bd1d1766190f561611b (patch) | |
| tree | 4f5255bed98fe6f22869691a4f96726f0f368f47 /src/vhdl/elocations_meta.ads | |
| parent | 5cfe481f7c2cbf90917b00862af02687f1ec2893 (diff) | |
| download | ghdl-1014234660d921a5dccb8bd1d1766190f561611b.tar.gz ghdl-1014234660d921a5dccb8bd1d1766190f561611b.tar.bz2 ghdl-1014234660d921a5dccb8bd1d1766190f561611b.zip | |
Add elocation for right parenthesis.
Diffstat (limited to 'src/vhdl/elocations_meta.ads')
| -rw-r--r-- | src/vhdl/elocations_meta.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/vhdl/elocations_meta.ads b/src/vhdl/elocations_meta.ads index 34d461a77..ed1f2cdf1 100644 --- a/src/vhdl/elocations_meta.ads +++ b/src/vhdl/elocations_meta.ads @@ -24,6 +24,7 @@ package Elocations_Meta is type Fields_Enum is ( Field_Start_Location, + Field_Right_Paren_Location, Field_End_Location, Field_Is_Location, Field_Begin_Location, @@ -48,6 +49,7 @@ package Elocations_Meta is (N : Iir; F : Fields_Enum; V: Location_Type); function Has_Start_Location (K : Iir_Kind) return Boolean; + function Has_Right_Paren_Location (K : Iir_Kind) return Boolean; function Has_End_Location (K : Iir_Kind) return Boolean; function Has_Is_Location (K : Iir_Kind) return Boolean; function Has_Begin_Location (K : Iir_Kind) return Boolean; |