diff --git a/src/test/create_testsuite b/src/test/create_testsuite index fa8c8d89f5d00a9bd7ca1cf3ec9c8ca41a0822e8..242422d770d59fcbc57c423cdf1758c260dd6a08 100755 --- a/src/test/create_testsuite +++ b/src/test/create_testsuite @@ -1965,7 +1965,10 @@ test_eq(zero_type(([])[7]),1) // - call_out, call_out_info, remove_call_out, find_call_out test_do(call_out(a,100000)) -test_do(call_out(lambda() {},1000.0)) +test_true(call_out(lambda() {},1000.0)) +test_true(remove_call_out(call_out(lambda() {},1000.0)) != -1) +test_true(find_call_out(call_out(lambda() {},1000.0)) > 990) +test_false(zero_type(remove_call_out(call_out(lambda() {},1000.0)))) test_true(arrayp(call_out_info())) test_true(sizeof(call_out_info()) > 0) test_true(call_out_info()[-1][0] > 1)