blob: 985df2b4c55bd56583c3d49186ec71ab7b8b5942 [file] [log] [blame]
-- with dwarf3+ or !strict-dwarf, we should produce DW_LANG_Ada95 (0xd)
-- as AT_language
-- { dg-do compile }
-- { dg-skip-if "No dwarf-2 support" { hppa*-*-hpux* } }
-- { dg-options "-cargs -gdwarf-3 -dA -margs" }
-- { dg-final { scan-assembler "0xd\[^\n\r\]*AT_language" } }
procedure Langdw3 is begin null; end;