From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 11931 invoked by alias); 15 Oct 2004 14:53:54 -0000 Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sources.redhat.com Received: (qmail 11755 invoked from network); 15 Oct 2004 14:53:52 -0000 Received: from unknown (HELO takamaka.act-europe.fr) (142.179.108.108) by sourceware.org with SMTP; 15 Oct 2004 14:53:52 -0000 Received: by takamaka.act-europe.fr (Postfix, from userid 507) id 5CC6B47D9A; Fri, 15 Oct 2004 07:53:51 -0700 (PDT) Date: Fri, 15 Oct 2004 14:53:00 -0000 From: Joel Brobecker To: gdb-patches@sources.redhat.com Subject: Re: [RFA/dwarf2] Set language to Ada for Ada compilation units Message-ID: <20041015145351.GS1375@gnat.com> References: <20041008060100.GD4623@gnat.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20041008060100.GD4623@gnat.com> User-Agent: Mutt/1.4i X-SW-Source: 2004-10/txt/msg00283.txt.bz2 Ping? Thank you, On Thu, Oct 07, 2004 at 11:01:00PM -0700, Joel Brobecker wrote: > Hello, > > Re: http://sources.redhat.com/ml/gdb/2004-10/msg00208.html > > This patch is almost obvious: Set the appropriate language when > processing an Ada CU. I didn't notice this because I used to use > an older compiler that still used stabs as the default debugging > format (we use the source filename extension in this case). > > 2004-10-07 Joel Brobecker > > * dwarf2read.c (set_cu_language): Set language to Ada for > DW_LANG_Ada83 and DW_LANG_Ada95. > > Tested on x86-linux, with GNAT (with a gcc-34 backend). Fixes > gdb.ada: null_record.exp: ptype on null record. > > OK to apply? > > Thanks, > -- > Joel > Index: dwarf2read.c > =================================================================== > RCS file: /cvs/src/src/gdb/dwarf2read.c,v > retrieving revision 1.163 > diff -u -p -r1.163 dwarf2read.c > --- dwarf2read.c 21 Sep 2004 15:04:41 -0000 1.163 > +++ dwarf2read.c 7 Oct 2004 14:24:29 -0000 > @@ -5932,6 +5932,8 @@ set_cu_language (unsigned int lang, stru > break; > case DW_LANG_Ada83: > case DW_LANG_Ada95: > + cu->language = language_ada; > + break; > case DW_LANG_Cobol74: > case DW_LANG_Cobol85: > case DW_LANG_Pascal83: -- Joel