1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16package 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 );
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 );