From dbc37f892b730f7fb0177770be3e3eb67ad36149 Mon Sep 17 00:00:00 2001 From: Alan Modra Date: Thu, 31 Jan 2002 03:57:52 +0000 Subject: * ld-scripts/crossref.exp: Allow foo to have a leading dot. * ld-scripts/cross1.t: Add .opd. * ld-undefined/undefined.exp: Allow leading dot on sym names. * lib/ld-lib.exp (default_ld_nm): Strip leading dots from syms. --- ld/testsuite/lib/ld-lib.exp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'ld/testsuite/lib') diff --git a/ld/testsuite/lib/ld-lib.exp b/ld/testsuite/lib/ld-lib.exp index 841b14b..06583e5 100644 --- a/ld/testsuite/lib/ld-lib.exp +++ b/ld/testsuite/lib/ld-lib.exp @@ -307,7 +307,7 @@ proc default_ld_nm { nm nmflags object } { set file [open tmpdir/nm.out r] while { [gets $file line] != -1 } { verbose "$line" 2 - if [regexp "^(\[0-9a-fA-F\]+) \[a-zA-Z0-9\] (.+)$" $line whole value name] { + if [regexp "^(\[0-9a-fA-F\]+) \[a-zA-Z0-9\] \\.*(.+)$" $line whole value name] { set name [string trimleft $name "_"] verbose "Setting nm_output($name) to 0x$value" 2 set nm_output($name) 0x$value -- cgit v1.1