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/psl03.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/psl03.vhdl')
-rw-r--r-- | testsuite/gna/issue2116/psl03.vhdl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/gna/issue2116/psl03.vhdl b/testsuite/gna/issue2116/psl03.vhdl new file mode 100644 index 000000000..ea4c82c92 --- /dev/null +++ b/testsuite/gna/issue2116/psl03.vhdl @@ -0,0 +1,6 @@ +package gen0 is +generic(v:natural:=0);function get return natural;end;package body gen0 is +function get return natural is +begin return 0;end;end;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 get2;end;package pkg0 is new work.gen0;package p is new work.gen2 generic map(work.pkg0);entity tb is +end;architecture behav of tb is +begin assert 0!;end behav;
\ No newline at end of file |