From 6bc84d1de4776a15939cf2b72021bdf0b97b930d Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 4 Feb 2020 18:54:41 +0100 Subject: testsuite/gna: add tests for previous 2 commits. --- testsuite/gna/bug0100/emptyquote.vhdl | 15 +++++++++++++++ testsuite/gna/bug0100/emptyquote2.vhdl | 15 +++++++++++++++ testsuite/gna/bug0100/testsuite.sh | 2 ++ 3 files changed, 32 insertions(+) create mode 100644 testsuite/gna/bug0100/emptyquote.vhdl create mode 100644 testsuite/gna/bug0100/emptyquote2.vhdl (limited to 'testsuite/gna/bug0100') diff --git a/testsuite/gna/bug0100/emptyquote.vhdl b/testsuite/gna/bug0100/emptyquote.vhdl new file mode 100644 index 000000000..4c7a80bce --- /dev/null +++ b/testsuite/gna/bug0100/emptyquote.vhdl @@ -0,0 +1,15 @@ +entity emptyquote is +end; + +architecture behav of emptyquote is + procedure proc is + begin + null; + end proc; +begin + process + begin + proc'' + null; + end process; +end; diff --git a/testsuite/gna/bug0100/emptyquote2.vhdl b/testsuite/gna/bug0100/emptyquote2.vhdl new file mode 100644 index 000000000..a02166976 --- /dev/null +++ b/testsuite/gna/bug0100/emptyquote2.vhdl @@ -0,0 +1,15 @@ +entity emptyquote is +end; + +architecture behav of emptyquote is + procedure proc is + begin + null; + end proc; +begin + process + begin + proc' ' + null; + end process; +end; diff --git a/testsuite/gna/bug0100/testsuite.sh b/testsuite/gna/bug0100/testsuite.sh index 92b8ad212..fc50f76ad 100755 --- a/testsuite/gna/bug0100/testsuite.sh +++ b/testsuite/gna/bug0100/testsuite.sh @@ -11,8 +11,10 @@ analyze_failure --force-analysis choicelen.vhdl analyze_failure --force-analysis noexpr.vhdl analyze_failure --force-analysis str.vhdl analyze_failure --force-analysis procinter.vhdl +analyze_failure --force-analysis emptyquote2.vhdl analyze_failure usrattr.vhdl analyze_failure forloop.vhdl +analyze_failure emptyquote.vhdl if analyze_failure --force-analysis notype1.vhdl 2>&1 | grep -q "indexed name"; then : -- cgit v1.2.3