diff options
Diffstat (limited to 'binutils')
| -rw-r--r-- | binutils/testsuite/lib/binutils-common.exp | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/binutils/testsuite/lib/binutils-common.exp b/binutils/testsuite/lib/binutils-common.exp index b0190ac..ab75241 100644 --- a/binutils/testsuite/lib/binutils-common.exp +++ b/binutils/testsuite/lib/binutils-common.exp @@ -112,6 +112,21 @@ proc is_pecoff_format args { return 0 } +# True if the object format is known to COFF or PE (but not ECOFF or XCOFF) +# +proc is_coff_format {} { + if { [is_pecoff_format] + || [istarget *-*-coff*] + || [istarget *-*-go32*] + || [istarget *-*-msdosdjgpp*] + || [istarget tic4x-*-*] + || [istarget tic54x-*-*] + || [istarget z8k-*-*] } { + return 1 + } + return 0 +} + proc is_som_format {} { if { ![istarget hppa*-*-*] || [istarget hppa*64*-*-*] } { return 0; |