changeset 664 | 44b0e894b7ab |
parent 653 | 8ee61c1e0c5c |
parent 655 | 3f65fd25dfd4 |
child 676 | b5e6747818a9 |
654:7c11c3d8d025 | 664:44b0e894b7ab |
---|---|
229 else { |
229 else { |
230 return "Unknown COFF object"; |
230 return "Unknown COFF object"; |
231 } |
231 } |
232 } |
232 } |
233 |
233 |
234 if ($typeBuf =~ /^!<arch>\x0A(.{48}([0-9 ]{9}).\x60\x0A(......))/s) { |
234 if ($typeBuf =~ /^!<arch>\x0A(.{48}([0-9 ]{9})\x60\x0A(......))/s) { |
235 # library - could be MARM or WINS |
235 # library - could be MARM or WINS |
236 |
236 |
237 $typeBuf = $1; |
237 $typeBuf = $1; |
238 my $member_start = 8; |
238 my $member_start = 8; |
239 |
239 |