diff options
| author | Mark Harmstone <mark@harmstone.com> | 2022-12-26 20:47:51 +0000 |
|---|---|---|
| committer | Alan Modra <amodra@gmail.com> | 2022-12-31 19:26:23 +1030 |
| commit | a667697f36ef4f910e09c4a02f34a44fa3e86157 (patch) | |
| tree | a2f98bd99216826df386c9874411082c23e18e79 /ld/testsuite/ld-pe/pdb.exp | |
| parent | 5c9e42e0e9a8f881f8e1ac6b1133de148b26bb30 (diff) | |
| download | gdb-a667697f36ef4f910e09c4a02f34a44fa3e86157.zip gdb-a667697f36ef4f910e09c4a02f34a44fa3e86157.tar.gz gdb-a667697f36ef4f910e09c4a02f34a44fa3e86157.tar.bz2 | |
ld/testsuite: Don't add index to sizes in pdb.exp
Diffstat (limited to 'ld/testsuite/ld-pe/pdb.exp')
| -rw-r--r-- | ld/testsuite/ld-pe/pdb.exp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ld/testsuite/ld-pe/pdb.exp b/ld/testsuite/ld-pe/pdb.exp index b201631..60aa39a 100644 --- a/ld/testsuite/ld-pe/pdb.exp +++ b/ld/testsuite/ld-pe/pdb.exp @@ -256,8 +256,8 @@ proc check_dbi_stream { pdb } { set data [read $fi 4] binary scan $data i type_server_map_size - set data [read $fi 4] - binary scan $data i mfc_type_server_index + # skip MFC type server index + seek $fi 4 current set data [read $fi 4] binary scan $data i optional_dbg_header_size @@ -271,7 +271,7 @@ proc check_dbi_stream { pdb } { set stream_length [file size tmpdir/0003] - if { $stream_length != [expr 0x40 + $mod_info_size + $section_contribution_size + $section_map_size + $source_info_size + $type_server_map_size + $mfc_type_server_index + $optional_dbg_header_size + $ec_substream_size] } { + if { $stream_length != [expr 0x40 + $mod_info_size + $section_contribution_size + $section_map_size + $source_info_size + $type_server_map_size + $optional_dbg_header_size + $ec_substream_size] } { return 0 } |