1-- { dg-do compile }
2
3pragma Optimize (Space); -- { dg-warning "must specify -Os" }
4
5procedure Warn8 is
6begin
7  null;
8end;
9