testsuite/gna/issue99/repro1.vhdl


1
2
3
4
5
6
7
8
9

package pkg is
  generic ( gen: natural );
  constant test: natural:=gen;
end package;

package body pkg is
end pkg;

package mygpkg is new work.pkg generic map ( gen => 17 );