1--  { dg-do compile }
2--  { dg-options "-Wall -O2" }
3package body Containers1 is
4   procedure Dummy is null;
5end Containers1;
6