From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 23961 invoked by alias); 8 Oct 2004 06:01:02 -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 23950 invoked from network); 8 Oct 2004 06:01:01 -0000 Received: from unknown (HELO takamaka.act-europe.fr) (142.179.108.108) by sourceware.org with SMTP; 8 Oct 2004 06:01:01 -0000 Received: by takamaka.act-europe.fr (Postfix, from userid 507) id 77FA947D98; Thu, 7 Oct 2004 23:01:00 -0700 (PDT) Date: Fri, 08 Oct 2004 06:01:00 -0000 From: Joel Brobecker To: gdb-patches@sources.redhat.com Subject: [RFA/dwarf2] Set language to Ada for Ada compilation units Message-ID: <20041008060100.GD4623@gnat.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="6c2NcOVqGQ03X4Wi" Content-Disposition: inline User-Agent: Mutt/1.4i X-SW-Source: 2004-10/txt/msg00139.txt.bz2 --6c2NcOVqGQ03X4Wi Content-Type: text/plain; charset=us-ascii Content-Disposition: inline Content-length: 625 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 --6c2NcOVqGQ03X4Wi Content-Type: text/plain; charset=us-ascii Content-Disposition: attachment; filename="dwarf2read.c.diff" Content-length: 540 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: --6c2NcOVqGQ03X4Wi--