From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 22688 invoked by alias); 22 May 2002 20:17:16 -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 22661 invoked from network); 22 May 2002 20:17:09 -0000 Received: from unknown (HELO zwingli.cygnus.com) (208.245.165.35) by sources.redhat.com with SMTP; 22 May 2002 20:17:09 -0000 Received: by zwingli.cygnus.com (Postfix, from userid 442) id 952B45EA11; Wed, 22 May 2002 15:17:00 -0500 (EST) From: Jim Blandy To: gdb-patches@sources.redhat.com Subject: RFA: make `info source' say whether macro info is present Message-Id: <20020522201700.952B45EA11@zwingli.cygnus.com> Date: Wed, 22 May 2002 14:28:00 -0000 X-SW-Source: 2002-05/txt/msg00862.txt.bz2 This will make it a bit easier to write tests that exit gracefully when the test executable doesn't have any information about preprocessor macros. Alternative suggestions welcome. gdb/ChangeLog: 2002-05-22 Jim Blandy * source.c (source_info): Mention whether the symtab has information about preprocessor macros. gdb/testsuite/ChangeLog: 2002-05-22 Jim Blandy * lib/gdb.exp (get_debug_format): Tolerate message saying whether preprocessor macro information is present. Index: gdb/source.c =================================================================== RCS file: /cvs/src/src/gdb/source.c,v retrieving revision 1.28 diff -c -r1.28 source.c *** gdb/source.c 23 Apr 2002 11:09:09 -0000 1.28 --- gdb/source.c 22 May 2002 20:13:14 -0000 *************** *** 500,505 **** --- 500,507 ---- printf_filtered ("Source language is %s.\n", language_str (s->language)); printf_filtered ("Compiled with %s debugging format.\n", s->debugformat); + printf_filtered ("%s preprocessor macro info.\n", + s->macro_table ? "Includes" : "Does not include"); } Index: gdb/testsuite/lib/gdb.exp =================================================================== RCS file: /cvs/src/src/gdb/testsuite/lib/gdb.exp,v retrieving revision 1.18 diff -c -r1.18 gdb.exp *** gdb/testsuite/lib/gdb.exp 10 May 2002 18:38:09 -0000 1.18 --- gdb/testsuite/lib/gdb.exp 22 May 2002 20:13:14 -0000 *************** *** 1435,1441 **** set debug_format "unknown" send_gdb "info source\n" gdb_expect 10 { ! -re "Compiled with (.*) debugging format.\r\n$gdb_prompt $" { set debug_format $expect_out(1,string) verbose "debug format is $debug_format" return 1; --- 1435,1441 ---- set debug_format "unknown" send_gdb "info source\n" gdb_expect 10 { ! -re "Compiled with (.*) debugging format.\r\n.*$gdb_prompt $" { set debug_format $expect_out(1,string) verbose "debug format is $debug_format" return 1;