1--  { dg-do compile }
2
3with Interfaces.C;
4
5procedure Warn15.Core.Main is
6   use type Interfaces.C.unsigned;  --  { dg-error "\"C\" not declared in \"Interfaces\"" }
7begin
8   null;
9end Warn15.Core.Main;
10