with Foo; with Bar; package A is new B (C);
