diff options
Diffstat (limited to 'libctf/testsuite/lib/ctf-lib.exp')
| -rw-r--r-- | libctf/testsuite/lib/ctf-lib.exp | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/libctf/testsuite/lib/ctf-lib.exp b/libctf/testsuite/lib/ctf-lib.exp index 796342b..fe02812 100644 --- a/libctf/testsuite/lib/ctf-lib.exp +++ b/libctf/testsuite/lib/ctf-lib.exp @@ -399,7 +399,12 @@ proc check_ctf_available { } { set f [open $src "w"] puts $f "int main() { return 0; }" close $f - set ctf_available_saved [compile_one_cc $src $output "-gt -c"] + set comp_output [compile_one_cc $src $output "-gt -c"] + if { $comp_output == ""} { + set ctf_available_saved 1 + } else { + set ctf_available_saved 0 + } remote_file host delete $src remote_file host delete $output file delete $src |