1 2 3 4 5 6 7 8
-- { dg-do run } with Aggr14_Pkg; use Aggr14_Pkg; procedure Aggr14 is begin Proc; end;