1with Ghost5_Parent;
2generic
3package Ghost5 is
4   procedure Foo;
5end Ghost5;
6