-- { dg-do link } with Elab4_Pkg; procedure Elab4 is begin null; end Elab4;