diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-07-02 07:40:14 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-07-02 07:40:14 +0200 |
commit | 87ab6659b16c7c7a3a63cb4d3987aa2a02ae5869 (patch) | |
tree | 237dcf1674057fbeb1e1bf7125a72aa5b5669d40 /testsuite/gna/issue2116/pkg1.vhdl | |
parent | 9b5de7a92a6ae8980bcaad0d1c87f0938c337f21 (diff) | |
download | ghdl-87ab6659b16c7c7a3a63cb4d3987aa2a02ae5869.tar.gz ghdl-87ab6659b16c7c7a3a63cb4d3987aa2a02ae5869.tar.bz2 ghdl-87ab6659b16c7c7a3a63cb4d3987aa2a02ae5869.zip |
testsuite/gna: add tests, close #2116
Diffstat (limited to 'testsuite/gna/issue2116/pkg1.vhdl')
-rw-r--r-- | testsuite/gna/issue2116/pkg1.vhdl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/gna/issue2116/pkg1.vhdl b/testsuite/gna/issue2116/pkg1.vhdl new file mode 100644 index 000000000..e76ccf6df --- /dev/null +++ b/testsuite/gna/issue2116/pkg1.vhdl @@ -0,0 +1,8 @@ +package gen0 is +generic(v:natural:=0);function get return natural;end gen0;package body gen0 is +function get return natural is +begin +return 0;end;end gen0;package gen2 is +generic(package pkg is new work.gen0 generic map(<>));function get2 return natural;end;package body gen2 is use pkg.all;function get2 return natural is begin return get;end;end;package p is new work.gen0;package g is new work.gen2 generic map(0);architecture behav of b is +begin +end behav;
\ No newline at end of file |