diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-07-21 21:35:27 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-07-21 21:35:27 +0200 |
commit | 79d140f39eb30e78655ecf448df8be48d22f6af3 (patch) | |
tree | 807758453949bb7f8c1d6959afdc06c682b2d21d /testsuite/gna/issue2136/test.vhdl | |
parent | 0051b3bca69ff96e8410a5f5fb8d588d4df25ce2 (diff) | |
download | ghdl-79d140f39eb30e78655ecf448df8be48d22f6af3.tar.gz ghdl-79d140f39eb30e78655ecf448df8be48d22f6af3.tar.bz2 ghdl-79d140f39eb30e78655ecf448df8be48d22f6af3.zip |
testsuite/gna: add a test for #2136
Diffstat (limited to 'testsuite/gna/issue2136/test.vhdl')
-rw-r--r-- | testsuite/gna/issue2136/test.vhdl | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/testsuite/gna/issue2136/test.vhdl b/testsuite/gna/issue2136/test.vhdl new file mode 100644 index 000000000..12560eaaa --- /dev/null +++ b/testsuite/gna/issue2136/test.vhdl @@ -0,0 +1,32 @@ +library ieee; +use ieee.std_logic_1164.all; +--use ieee.std_logic_arith.all; +--use ieee.std_logic_unsigned.all; + +entity test is +end; + +architecture BHV of test is + type matrixType is array(natural range <>) of std_logic_vector; + + function get_min( a : matrixType) return std_logic_vector is + variable res : a'element; + begin + report "a: " & natural'image(a'left) & natural'image (a'right); + res:=a(a'left); + for i in a'range loop + if (a(i)<res) then + res:=a(i); + end if; + end loop; + return res; + end function get_min; + + signal matrix1 : matrixType(0 to 1)(7 downto 0):=(x"80",x"10"); + signal min1 : std_logic_vector (7 downto 0); + +begin + + min1 <= get_min(matrix1); + +end; |