diff options
author | Tristan Gingold <tgingold@free.fr> | 2015-05-09 22:02:12 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2015-05-09 22:02:12 +0200 |
commit | 9890c3b761468eda5cb1565e93c851bedccd66d5 (patch) | |
tree | dada4f59315f99301ddc3eb0861d16c6ed7c31fc /testsuite/gna/ticket41/bug.vhdl | |
parent | 69bbb91b44a1677fd1a0e5accce91f756b06727a (diff) | |
download | ghdl-9890c3b761468eda5cb1565e93c851bedccd66d5.tar.gz ghdl-9890c3b761468eda5cb1565e93c851bedccd66d5.tar.bz2 ghdl-9890c3b761468eda5cb1565e93c851bedccd66d5.zip |
File ticket41 testcase.
Diffstat (limited to 'testsuite/gna/ticket41/bug.vhdl')
-rw-r--r-- | testsuite/gna/ticket41/bug.vhdl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/gna/ticket41/bug.vhdl b/testsuite/gna/ticket41/bug.vhdl new file mode 100644 index 000000000..8c4e4a9ca --- /dev/null +++ b/testsuite/gna/ticket41/bug.vhdl @@ -0,0 +1,16 @@ +package pkg is + procedure proc; + alias prog_alias is proc[]; +end package; + +package body pkg is + procedure proc is + begin + end; + + impure function prog_alias return integer is + begin + prog_alias; + return 0; + end; +end package body; |