diff options
| -rw-r--r-- | testsuite/gna/bug081/test_comp.vhdl | 8 | ||||
| -rwxr-xr-x | testsuite/gna/bug081/testsuite.sh | 1 |
2 files changed, 9 insertions, 0 deletions
diff --git a/testsuite/gna/bug081/test_comp.vhdl b/testsuite/gna/bug081/test_comp.vhdl new file mode 100644 index 000000000..d553eaaf7 --- /dev/null +++ b/testsuite/gna/bug081/test_comp.vhdl @@ -0,0 +1,8 @@ +package test_comp is + function log2 (v : natural) return natural; + + component my_comp is + generic (max : natural); + port (o : out bit_vector(log2(max) - 1 downto 0)); + end component; +end test_comp; diff --git a/testsuite/gna/bug081/testsuite.sh b/testsuite/gna/bug081/testsuite.sh index 96c1d80b9..a5de13f5e 100755 --- a/testsuite/gna/bug081/testsuite.sh +++ b/testsuite/gna/bug081/testsuite.sh @@ -5,6 +5,7 @@ analyze_failure -Werror=elaboration dummy.vhdl analyze_failure -Werror=elaboration elab_func.vhdl analyze_failure --std=08 -Werror=elaboration elab_prot.vhdl +analyze -Werror=elaboration test_comp.vhdl analyze dummy.vhdl elab_simulate_failure dummyentity |