diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-03-06 20:36:06 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-03-06 20:36:06 +0100 |
commit | 262195377f9fa9d63ad884c49c557d6ad004c5bc (patch) | |
tree | c120ff187a7986e1f73be8f11c08cb260cd4379d /testsuite/gna/bug0100/bitstr.vhdl | |
parent | e90e022474b15f4db7b3732ff9cb5110fb44562b (diff) | |
download | ghdl-262195377f9fa9d63ad884c49c557d6ad004c5bc.tar.gz ghdl-262195377f9fa9d63ad884c49c557d6ad004c5bc.tar.bz2 ghdl-262195377f9fa9d63ad884c49c557d6ad004c5bc.zip |
testsuite/gna: add a test for previous commit.
Diffstat (limited to 'testsuite/gna/bug0100/bitstr.vhdl')
-rw-r--r-- | testsuite/gna/bug0100/bitstr.vhdl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/gna/bug0100/bitstr.vhdl b/testsuite/gna/bug0100/bitstr.vhdl new file mode 100644 index 000000000..e256db159 --- /dev/null +++ b/testsuite/gna/bug0100/bitstr.vhdl @@ -0,0 +1,16 @@ +entity bitstr is + port (a : bit_vector (7 downto 0); + o : out bit); +end bitstr; + +architecture behav of bitstr is +begin + process (a) + begin + if a = bx"00" then + o <= '1'; + else + o <= '0'; + end if; + end process; +end behav; |