From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 11715 invoked by alias); 10 Dec 2006 14:38:18 -0000 Received: (qmail 11680 invoked from network); 10 Dec 2006 14:38:04 -0000 Received: from unknown (195.23.133.216) by sourceware.org with QMTP; 10 Dec 2006 14:38:04 -0000 Received: (qmail 5387 invoked from network); 10 Dec 2006 14:38:03 -0000 Received: from unknown (HELO mailfrt09.isp.novis.pt) ([195.23.133.201]) (envelope-sender ) by mailrly06.isp.novis.pt with compressed SMTP; 10 Dec 2006 14:38:03 -0000 Received: (qmail 26718 invoked from network); 10 Dec 2006 14:38:02 -0000 Received: from unknown (HELO [127.0.0.1]) ([195.23.225.203]) (envelope-sender ) by mailfrt09.isp.novis.pt with SMTP; 10 Dec 2006 14:38:02 -0000 Message-ID: <457C1BBA.8020802@portugalmail.pt> Date: Sun, 10 Dec 2006 14:38:00 -0000 From: Pedro Alves User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; pt-BR; rv:1.8.0.8) Gecko/20061025 Thunderbird/1.5.0.8 Mnenhy/0.7.4.0 MIME-Version: 1.0 To: gdb-patches@sourceware.org Subject: [RFH] Cygwin (EXEEXT) fix. Content-Type: multipart/mixed; boundary="------------090807040202020706040302" X-Antivirus: avast! (VPS 0655-1, 08-12-2006), Outbound message X-Antivirus-Status: Clean X-IsSubscribed: yes Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org X-SW-Source: 2006-12/txt/msg00150.txt.bz2 This is a multi-part message in MIME format. --------------090807040202020706040302 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Content-length: 1259 Hi all, (I know this is a bit offtopic here, since it has mostly to do with my lack of tcl knowledge.) There is a fail on gdb.base/annota3.exp on Cygwin related to a missing EXEEXT that I need help in fixing. Where is reads '.*annota3' in: gdb_expect_list "run until main breakpoint" "$gdb_prompt$" { "\r\n\032\032post-prompt\r\n" "Starting program: .*annota3 \r\n" "\r\n\032\032starting\r\n" "\r\n\032\032breakpoint 1\r\n" (...) My first approach was: - "Starting program: .*annota3 \r\n" + "Starting program: .*annota3${EXEEXT} \r\n" But that doesn't work: The variable doesn't get expanded. Doing: - "Starting program: .*annota3 \r\n" + "Starting program: .*annota3" [$EXEEXT] " \r\n" ... also doesn't work, much to my surprise, since I copied the syntax from gdb.arch/altivec-regs.exp : (...) gdb_expect_list "info vector" ".*$gdb_prompt $" { [$pattern0] [$pattern1] (...) I see that uppercase/lowercase makes a difference, since, if I do a: + set exeext ".exe" - "Starting program: .*annota3 \r\n" + "Starting program: .*annota3" [$exeext] " \r\n" The regex always passes, no matter what I put in $exeext, even if I put something like "asdfad". How does one go about fixing this? Cheers, Pedro Alves --------------090807040202020706040302 Content-Type: text/plain; name="annota3.diff" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="annota3.diff" Content-length: 982 Index: gdb.base/annota3.exp =================================================================== RCS file: /cvs/src/src/gdb/testsuite/gdb.base/annota3.exp,v retrieving revision 1.9 diff -u -p -r1.9 annota3.exp --- gdb.base/annota3.exp 10 Aug 2006 05:27:20 -0000 1.9 +++ gdb.base/annota3.exp 10 Dec 2006 14:16:17 -0000 @@ -39,7 +39,7 @@ set bug_id 0 set testfile "annota3" set srcfile ${testfile}.c -set binfile ${objdir}/${subdir}/${testfile} +set binfile ${objdir}/${subdir}/${testfile}$EXEEXT if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } { untested annota3.exp @@ -118,7 +118,7 @@ gdb_expect_list "breakpoint info" "$gdb_ send_gdb "run\n" gdb_expect_list "run until main breakpoint" "$gdb_prompt$" { "\r\n\032\032post-prompt\r\n" - "Starting program: .*annota3 \r\n" + "Starting program: .*annota3" [$EXEEXT] " \r\n" "\r\n\032\032starting\r\n" "\r\n\032\032breakpoint 1\r\n" "\r\n" --------------090807040202020706040302--