1-- { dg-compile } 2-- { dg-options "-g" } 3 4with Debug4_Pkg; 5 6procedure Debug4 is 7 package P is new Debug4_Pkg (Natural); 8begin 9 null; 10end; 11