diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-04-05 08:56:13 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-04-05 08:56:13 +0200 |
commit | a9f68a1d91f8ea2a74d8ad4c34f9c777746848a4 (patch) | |
tree | 8994a975e6ddd5c9ec7aea2e6ceaab2c44629e10 /src/vhdl/vhdl-utils.ads | |
parent | b0e6f54aba3912da5ad84e90ebc53b08ba716733 (diff) | |
download | ghdl-a9f68a1d91f8ea2a74d8ad4c34f9c777746848a4.tar.gz ghdl-a9f68a1d91f8ea2a74d8ad4c34f9c777746848a4.tar.bz2 ghdl-a9f68a1d91f8ea2a74d8ad4c34f9c777746848a4.zip |
vhdl: add Iir_Kind_Foreign_Module
Diffstat (limited to 'src/vhdl/vhdl-utils.ads')
-rw-r--r-- | src/vhdl/vhdl-utils.ads | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-utils.ads b/src/vhdl/vhdl-utils.ads index 4d78640eb..fbea75776 100644 --- a/src/vhdl/vhdl-utils.ads +++ b/src/vhdl/vhdl-utils.ads @@ -398,6 +398,7 @@ package Vhdl.Utils is -- Return True IFF kind of N is K1 or K2. function Kind_In (N : Iir; K1, K2 : Iir_Kind) return Boolean; + function Kind_In (N : Iir; K1, K2, K3 : Iir_Kind) return Boolean; pragma Inline (Kind_In); subtype Parameter_Index is Natural range 1 .. 4; |