diff options
| -rw-r--r-- | testsuite/synth/issue1036/ent.vhdl | 16 | ||||
| -rwxr-xr-x | testsuite/synth/issue1036/testsuite.sh | 12 |
2 files changed, 28 insertions, 0 deletions
diff --git a/testsuite/synth/issue1036/ent.vhdl b/testsuite/synth/issue1036/ent.vhdl new file mode 100644 index 000000000..534c32b56 --- /dev/null +++ b/testsuite/synth/issue1036/ent.vhdl @@ -0,0 +1,16 @@ +entity ent is +end ent; + +architecture a of ent is + signal s : string(1 to 3); +begin + s <= "abc"; + + process(all) + begin + case s is + when "abc" => + when others => + end case; + end process; +end a; diff --git a/testsuite/synth/issue1036/testsuite.sh b/testsuite/synth/issue1036/testsuite.sh new file mode 100755 index 000000000..ed8a512fa --- /dev/null +++ b/testsuite/synth/issue1036/testsuite.sh @@ -0,0 +1,12 @@ +#! /bin/sh + +. ../../testenv.sh + +GHDL_STD_FLAGS=--std=08 +for t in ent; do + synth $t.vhdl -e $t > syn_$t.vhdl +done + +clean + +echo "Test successful" |