diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-08-06 09:36:10 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-08-06 09:36:10 +0200 |
commit | ce416ec62d20f1a592835efe5cbe49856d7085a2 (patch) | |
tree | b008fe10776a7831d24f9e29b63781ccae876500 /testsuite/gna/issue877/tb.vhdl | |
parent | 6facf7626446acce5693b257fe7643d7b565118d (diff) | |
download | ghdl-ce416ec62d20f1a592835efe5cbe49856d7085a2.tar.gz ghdl-ce416ec62d20f1a592835efe5cbe49856d7085a2.tar.bz2 ghdl-ce416ec62d20f1a592835efe5cbe49856d7085a2.zip |
Add testcase for #877
Diffstat (limited to 'testsuite/gna/issue877/tb.vhdl')
-rw-r--r-- | testsuite/gna/issue877/tb.vhdl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/testsuite/gna/issue877/tb.vhdl b/testsuite/gna/issue877/tb.vhdl new file mode 100644 index 000000000..e88ab827f --- /dev/null +++ b/testsuite/gna/issue877/tb.vhdl @@ -0,0 +1,9 @@ +entity tb is +end tb; + +architecture behav of tb is + constant msg : string := "hello world"; +begin + assert msg (positive range 1 to 5) = "hello" severity failure; + assert msg (positive range 7 to 11) = "world"; +end behav; |