1-- { dg-do compile { target *-*-linux* } }
2-- { dg-options "-gdwarf-2" }
3
4procedure Return3 is
5begin
6  return;
7end;
8
9-- { dg-final { scan-assembler "loc 1 6" } }
10