mirror of git://gcc.gnu.org/git/gcc.git
[PR libffi/65567] libffi: Fix, and simply libffi_feature_test
libffi/ PR libffi/65567 * testsuite/lib/libffi.exp (libffi_feature_test): Fix, and simply. From-SVN: r236594
This commit is contained in:
parent
f397602394
commit
7e5a3c96db
|
|
@ -1,3 +1,8 @@
|
||||||
|
2016-05-23 Thomas Schwinge <thomas@codesourcery.com>
|
||||||
|
|
||||||
|
PR libffi/65567
|
||||||
|
* testsuite/lib/libffi.exp (libffi_feature_test): Fix, and simply.
|
||||||
|
|
||||||
2016-03-17 Andreas Schwab <schwab@suse.de>
|
2016-03-17 Andreas Schwab <schwab@suse.de>
|
||||||
|
|
||||||
* src/aarch64/ffitarget.h (FFI_SIZEOF_JAVA_RAW) [__ILP32__]:
|
* src/aarch64/ffitarget.h (FFI_SIZEOF_JAVA_RAW) [__ILP32__]:
|
||||||
|
|
|
||||||
|
|
@ -227,20 +227,21 @@ proc libffi_target_compile { source dest type options } {
|
||||||
|
|
||||||
# TEST should be a preprocessor condition. Returns true if it holds.
|
# TEST should be a preprocessor condition. Returns true if it holds.
|
||||||
proc libffi_feature_test { test } {
|
proc libffi_feature_test { test } {
|
||||||
set src "ffitest.c"
|
set src "ffitest[pid].c"
|
||||||
|
|
||||||
set f [open $src "w"]
|
set f [open $src "w"]
|
||||||
puts $f "#include <ffi.h>"
|
puts $f "#include <ffi.h>"
|
||||||
puts $f $test
|
puts $f $test
|
||||||
puts $f "xyzzy"
|
puts $f "/* OK */"
|
||||||
|
puts $f "#else"
|
||||||
|
puts $f "# error Failed $test"
|
||||||
puts $f "#endif"
|
puts $f "#endif"
|
||||||
close $f
|
close $f
|
||||||
|
|
||||||
set lines [libffi_target_compile $src "" "preprocess" ""]
|
set lines [libffi_target_compile $src /dev/null assembly ""]
|
||||||
file delete $src
|
file delete $src
|
||||||
|
|
||||||
set last [lindex [split $lines] end]
|
return [string match "" $lines]
|
||||||
return [regexp -- "xyzzy" $last]
|
|
||||||
}
|
}
|
||||||
|
|
||||||
# Utility routines.
|
# Utility routines.
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue