From: Tom Tromey <tromey@adacore.com>
Date: Thu, 6 Jan 2022 14:34:44 +0000 (-0700)
Subject: Fix some failures in langs.exp
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=d8504344d476f90bffca815b33b69fd778677478;p=binutils-gdb.git

Fix some failures in langs.exp

langs.exp currently has some fails for me because the stack trace
includes full paths to the source files.

    FAIL: gdb.base/langs.exp: up to foo in langs.exp
    FAIL: gdb.base/langs.exp: up to cppsub_ in langs.exp
    FAIL: gdb.base/langs.exp: up to fsub in langs.exp

This fixes the failures by making the filename regexps a bit more lax.
---

diff --git a/gdb/testsuite/gdb.base/langs.exp b/gdb/testsuite/gdb.base/langs.exp
index 7d93875edf9..134cde1f6b5 100644
--- a/gdb/testsuite/gdb.base/langs.exp
+++ b/gdb/testsuite/gdb.base/langs.exp
@@ -64,20 +64,20 @@ if [runto csub] then {
 
     if { !$isfixed } { set lang c\\+\\+; set ext cxx }
     if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" }
-    gdb_test "up" ".* in (foo|$foo_func).* at langs2\\.$ext.*return csub \\(.*" \
+    gdb_test "up" ".* in (foo|$foo_func).* at .*langs2\\.$ext.*return csub \\(.*" \
 	"up to foo in langs.exp"
     gdb_test "show language" "currently $lang.*" \
 	"show language at foo in langs.exp"
 
     if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" }
-    gdb_test "up" ".* in cppsub_ .* at langs2\\.$ext.*return foo \\(.*" \
+    gdb_test "up" ".* in cppsub_ .* at .*langs2\\.$ext.*return foo \\(.*" \
 	"up to cppsub_ in langs.exp"
     gdb_test "show language" "currently $lang.*" \
 	"show language at cppsub_ in langs.exp"
 
     if { !$isfixed } { set lang fortran }
     if {!$gcc_compiled} then { setup_xfail "rs6000-*-*" }
-    gdb_test "up" ".* in fsub.* at langs1\\.f.*" \
+    gdb_test "up" ".* in fsub.* at .*langs1\\.f.*" \
 	"up to fsub in langs.exp"
     gdb_test "show language" "currently $lang.*" \
 	"show language at fsub in langs.exp"