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