void register_tests()
{
REGISTER_TEST_CASE(stateful_code_snippets::simple_tests);
REGISTER_TEST_CASE(stateful_code_snippets::name_overlapping);
REGISTER_TEST_CASE(stateful_code_snippets::if_blocks);
REGISTER_TEST_CASE(stateful_code_snippets::function_calls);
REGISTER_TEST_CASE(stateful_code_snippets::for_loops);
}
void register_tests()
{
#if 0
REGISTER_TEST_CASE(modules_test::source_file_location);
REGISTER_TEST_CASE(modules_test::test_explicit_output);
REGISTER_TEST_CASE(modules_test::module_always_has_primary_output);
REGISTER_TEST_CASE(modules_test::non_required_module_is_not_visible);
#endif
}
void register_tests()
{
REGISTER_TEST_CASE(handle_tests::test_simple);
REGISTER_TEST_CASE(handle_tests::test_with_state);
REGISTER_TEST_CASE(handle_tests::test_deleted_state);
//TEST_DISABLED REGISTER_TEST_CASE(handle_tests::test_in_subroutine_state);
//TEST_DISABLED REGISTER_TEST_CASE(handle_tests::test_state_inside_if_block);
//TEST_DISABLED REGISTER_TEST_CASE(handle_tests::test_that_stripping_state_is_recursive);
//TEST_DISABLED REGISTER_TEST_CASE(handle_tests::test_included_file_changed);
REGISTER_TEST_CASE(handle_tests::test_user_defined_type);
}
void register_tests()
{
REGISTER_TEST_CASE(if_block_tests::test_if_joining);
REGISTER_TEST_CASE(if_block_tests::test_if_elif_else);
REGISTER_TEST_CASE(if_block_tests::test_dont_always_rebind_inner_names);
REGISTER_TEST_CASE(if_block_tests::test_execution);
REGISTER_TEST_CASE(if_block_tests::test_execution_with_elif);
REGISTER_TEST_CASE(if_block_tests::test_parse_with_no_line_endings);
REGISTER_TEST_CASE(if_block_tests::test_state_simple);
REGISTER_TEST_CASE(if_block_tests::test_state_is_reset_when_if_fails);
REGISTER_TEST_CASE(if_block_tests::test_state_is_reset_when_if_fails2);
}
void register_tests()
{
// TEST_DISABLED because most of the hosted unit tests rely on subroutines using
// outer locals.
return;
REGISTER_TEST_CASE(hosted_unit_tests::run_all);
}
void register_tests()
{
REGISTER_TEST_CASE(type_inference_tests::test_find_common_type);
REGISTER_TEST_CASE(type_inference_tests::test_find_type_of_get_index);
REGISTER_TEST_CASE(type_inference_tests::compare_builtin_types);
REGISTER_TEST_CASE(type_inference_tests::for_loop_output_type);
REGISTER_TEST_CASE(type_inference_tests::assign_output_type);
REGISTER_TEST_CASE(type_inference_tests::infer_length);
REGISTER_TEST_CASE(type_inference_tests::infer_type_of_append);
}
void register_tests()
{
REGISTER_TEST_CASE(names::find_name);
REGISTER_TEST_CASE(names::global_names);
REGISTER_TEST_CASE(names::unique_ordinals);
REGISTER_TEST_CASE(names::test_find_ordinal_suffix);
REGISTER_TEST_CASE(names::search_every_global_name);
REGISTER_TEST_CASE(names::bug_with_lookup_type_and_qualified_name);
REGISTER_TEST_CASE(names::type_name_visible_from_module);
}
void register_tests()
{
REGISTER_TEST_CASE(path_expression_tests::simple_name_match);
REGISTER_TEST_CASE(path_expression_tests::nested_name_match);
REGISTER_TEST_CASE(path_expression_tests::wildcard_nested_match);
REGISTER_TEST_CASE(path_expression_tests::recursive_wildcard_match);
REGISTER_TEST_CASE(path_expression_tests::function_match);
REGISTER_TEST_CASE(path_expression_tests::recursive_function_match);
}
void register_tests() {
//TEST_DISABLED REGISTER_TEST_CASE(source_repro_tests::generate_source_for_function_calls);
REGISTER_TEST_CASE(source_repro_tests::bug_reproducing_list_after_eval);
REGISTER_TEST_CASE(source_repro_tests::death_reproducing_builtin_functions);
}
int main(int argc, char* argv[])
{
tinytest_init(argc, argv);
srand(42);
/* main.c */
REGISTER_TEST_CASE(SameFileTest);
/* test-close.c */
REGISTER_TEST_CASE(CloseDouble);
REGISTER_TEST_CASE(CloseFloat);
REGISTER_TEST_CASE(CloseDouble_Fails);
REGISTER_TEST_CASE(CloseFloat_Fails);
/* test-check-eq.c */
REGISTER_TEST_CASE(CheckEqualDouble);
REGISTER_TEST_CASE(CheckEqualDoubleFails);
REGISTER_TEST_CASE(CheckEqualFloat);
REGISTER_TEST_CASE(CheckEqualFloatFails);
REGISTER_TEST_CASE(CheckEqualInteger);
REGISTER_TEST_CASE(CheckEqualIntegerFails);
REGISTER_TEST_CASE(CheckEqualUnsigned);
REGISTER_TEST_CASE(CheckEqualUnsignedFails);
/* test-check-ne.c */
REGISTER_TEST_CASE(CheckNotEqualDouble);
REGISTER_TEST_CASE(CheckNotEqualDoubleFails);
REGISTER_TEST_CASE(CheckNotEqualFloat);
REGISTER_TEST_CASE(CheckNotEqualFloatFails);
REGISTER_TEST_CASE(CheckNotEqualInteger);
REGISTER_TEST_CASE(CheckNotEqualIntegerFails);
REGISTER_TEST_CASE(CheckNotEqualUnsigned);
REGISTER_TEST_CASE(CheckNotEqualUnsignedFails);
/* test-check-gt.c */
REGISTER_TEST_CASE(CheckGreaterThanDouble);
REGISTER_TEST_CASE(CheckGreaterThanDoubleFails);
REGISTER_TEST_CASE(CheckGreaterThanFloat);
REGISTER_TEST_CASE(CheckGreaterThanFloatFails);
REGISTER_TEST_CASE(CheckGreaterThanInteger);
REGISTER_TEST_CASE(CheckGreaterThanIntegerFails);
REGISTER_TEST_CASE(CheckGreaterThanUnsigned);
REGISTER_TEST_CASE(CheckGreaterThanUnsignedFails);
/* test-check-ge.c */
REGISTER_TEST_CASE(CheckGreaterEqualDouble);
REGISTER_TEST_CASE(CheckGreaterEqualDoubleFails);
REGISTER_TEST_CASE(CheckGreaterEqualFloat);
REGISTER_TEST_CASE(CheckGreaterEqualFloatFails);
REGISTER_TEST_CASE(CheckGreaterEqualInteger);
REGISTER_TEST_CASE(CheckGreaterEqualIntegerFails);
REGISTER_TEST_CASE(CheckGreaterEqualUnsigned);
REGISTER_TEST_CASE(CheckGreaterEqualUnsignedFails);
/* test-check-lt.c */
REGISTER_TEST_CASE(CheckLesserThanDouble);
REGISTER_TEST_CASE(CheckLesserThanDoubleFails);
REGISTER_TEST_CASE(CheckLesserThanFloat);
REGISTER_TEST_CASE(CheckLesserThanFloatFails);
REGISTER_TEST_CASE(CheckLesserThanInteger);
REGISTER_TEST_CASE(CheckLesserThanIntegerFails);
REGISTER_TEST_CASE(CheckLesserThanUnsigned);
REGISTER_TEST_CASE(CheckLesserThanUnsignedFails);
/* test-check-le.c */
REGISTER_TEST_CASE(CheckLesserEqualDouble);
REGISTER_TEST_CASE(CheckLesserEqualDoubleFails);
REGISTER_TEST_CASE(CheckLesserEqualFloat);
REGISTER_TEST_CASE(CheckLesserEqualFloatFails);
REGISTER_TEST_CASE(CheckLesserEqualInteger);
REGISTER_TEST_CASE(CheckLesserEqualIntegerFails);
REGISTER_TEST_CASE(CheckLesserEqualUnsigned);
REGISTER_TEST_CASE(CheckLesserEqualUnsignedFails);
/* test-allcheck-eq.c */
REGISTER_TEST_CASE(AllCheckEqualInteger_Small);
REGISTER_TEST_CASE(AllCheckEqualInteger_Large);
REGISTER_TEST_CASE(AllCheckEqualInteger_Array);
REGISTER_TEST_CASE(AllCheckEqualInteger_Fails);
REGISTER_TEST_CASE(AllCheckEqualUnsigned_Small);
REGISTER_TEST_CASE(AllCheckEqualUnsigned_Large);
REGISTER_TEST_CASE(AllCheckEqualUnsigned_Array);
REGISTER_TEST_CASE(AllCheckEqualUnsigned_Fails);
/* test-allcheck-ne.c */
REGISTER_TEST_CASE(AllCheckNotEqualInteger_Small);
REGISTER_TEST_CASE(AllCheckNotEqualInteger_Large);
REGISTER_TEST_CASE(AllCheckNotEqualInteger_Array);
REGISTER_TEST_CASE(AllCheckNotEqualInteger_Fails);
REGISTER_TEST_CASE(AllCheckNotEqualUnsigned_Small);
REGISTER_TEST_CASE(AllCheckNotEqualUnsigned_Large);
REGISTER_TEST_CASE(AllCheckNotEqualUnsigned_Array);
REGISTER_TEST_CASE(AllCheckNotEqualUnsigned_Fails);
REGISTER_TEST_CASE(AllCheckNotEqualDouble_Small);
REGISTER_TEST_CASE(AllCheckNotEqualDouble_Large);
REGISTER_TEST_CASE(AllCheckNotEqualDouble_Array);
REGISTER_TEST_CASE(AllCheckNotEqualDouble_Fails);
REGISTER_TEST_CASE(AllCheckNotEqualFloat_Small);
REGISTER_TEST_CASE(AllCheckNotEqualFloat_Large);
REGISTER_TEST_CASE(AllCheckNotEqualFloat_Array);
REGISTER_TEST_CASE(AllCheckNotEqualFloat_Fails);
/* test-allcheck-gt.c */
REGISTER_TEST_CASE(AllCheckGreaterThanInteger_Small);
REGISTER_TEST_CASE(AllCheckGreaterThanInteger_Large);
REGISTER_TEST_CASE(AllCheckGreaterThanInteger_Array);
REGISTER_TEST_CASE(AllCheckGreaterThanInteger_Fails);
REGISTER_TEST_CASE(AllCheckGreaterThanUnsigned_Small);
REGISTER_TEST_CASE(AllCheckGreaterThanUnsigned_Large);
REGISTER_TEST_CASE(AllCheckGreaterThanUnsigned_Array);
REGISTER_TEST_CASE(AllCheckGreaterThanUnsigned_Fails);
REGISTER_TEST_CASE(AllCheckGreaterThanDouble_Small);
REGISTER_TEST_CASE(AllCheckGreaterThanDouble_Large);
REGISTER_TEST_CASE(AllCheckGreaterThanDouble_Array);
REGISTER_TEST_CASE(AllCheckGreaterThanDouble_Fails);
REGISTER_TEST_CASE(AllCheckGreaterThanFloat_Small);
REGISTER_TEST_CASE(AllCheckGreaterThanFloat_Large);
REGISTER_TEST_CASE(AllCheckGreaterThanFloat_Array);
REGISTER_TEST_CASE(AllCheckGreaterThanFloat_Fails);
/* test-allcheck-ge.c */
REGISTER_TEST_CASE(AllCheckGreaterEqualThanInteger_Small);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanInteger_Large);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanInteger_Array);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanInteger_Fails);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanUnsigned_Small);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanUnsigned_Large);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanUnsigned_Array);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanUnsigned_Fails);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanDouble_Small);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanDouble_Large);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanDouble_Array);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanDouble_Fails);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanFloat_Small);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanFloat_Large);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanFloat_Array);
REGISTER_TEST_CASE(AllCheckGreaterEqualThanFloat_Fails);
/* test-allcheck-lt.c */
REGISTER_TEST_CASE(AllCheckLesserThanInteger_Small);
REGISTER_TEST_CASE(AllCheckLesserThanInteger_Large);
REGISTER_TEST_CASE(AllCheckLesserThanInteger_Array);
REGISTER_TEST_CASE(AllCheckLesserThanInteger_Fails);
REGISTER_TEST_CASE(AllCheckLesserThanUnsigned_Small);
REGISTER_TEST_CASE(AllCheckLesserThanUnsigned_Large);
REGISTER_TEST_CASE(AllCheckLesserThanUnsigned_Array);
REGISTER_TEST_CASE(AllCheckLesserThanUnsigned_Fails);
REGISTER_TEST_CASE(AllCheckLesserThanDouble_Small);
REGISTER_TEST_CASE(AllCheckLesserThanDouble_Large);
REGISTER_TEST_CASE(AllCheckLesserThanDouble_Array);
REGISTER_TEST_CASE(AllCheckLesserThanDouble_Fails);
REGISTER_TEST_CASE(AllCheckLesserThanFloat_Small);
REGISTER_TEST_CASE(AllCheckLesserThanFloat_Large);
REGISTER_TEST_CASE(AllCheckLesserThanFloat_Array);
REGISTER_TEST_CASE(AllCheckLesserThanFloat_Fails);
/* test-allcheck-le.c */
REGISTER_TEST_CASE(AllCheckLesserEqualThanInteger_Small);
REGISTER_TEST_CASE(AllCheckLesserEqualThanInteger_Large);
REGISTER_TEST_CASE(AllCheckLesserEqualThanInteger_Array);
REGISTER_TEST_CASE(AllCheckLesserEqualThanInteger_Fails);
REGISTER_TEST_CASE(AllCheckLesserEqualThanUnsigned_Small);
REGISTER_TEST_CASE(AllCheckLesserEqualThanUnsigned_Large);
REGISTER_TEST_CASE(AllCheckLesserEqualThanUnsigned_Array);
REGISTER_TEST_CASE(AllCheckLesserEqualThanUnsigned_Fails);
REGISTER_TEST_CASE(AllCheckLesserEqualThanDouble_Small);
REGISTER_TEST_CASE(AllCheckLesserEqualThanDouble_Large);
REGISTER_TEST_CASE(AllCheckLesserEqualThanDouble_Array);
REGISTER_TEST_CASE(AllCheckLesserEqualThanDouble_Fails);
REGISTER_TEST_CASE(AllCheckLesserEqualThanFloat_Small);
REGISTER_TEST_CASE(AllCheckLesserEqualThanFloat_Large);
REGISTER_TEST_CASE(AllCheckLesserEqualThanFloat_Array);
REGISTER_TEST_CASE(AllCheckLesserEqualThanFloat_Fails);
/* test-allclose-double.c */
REGISTER_TEST_CASE(AllcloseDouble_Small);
REGISTER_TEST_CASE(AllcloseDouble_Large);
REGISTER_TEST_CASE(AllcloseDouble_Array);
REGISTER_TEST_CASE(AllcloseDouble_Infinity);
REGISTER_TEST_CASE(AllcloseDouble_Fails);
/* test-allclose-float.c */
REGISTER_TEST_CASE(AllcloseFloat_Small);
REGISTER_TEST_CASE(AllcloseFloat_Large);
REGISTER_TEST_CASE(AllcloseFloat_Array);
REGISTER_TEST_CASE(AllcloseFloat_Infinity);
REGISTER_TEST_CASE(AllcloseFloat_Fails);
/* test-main-arg.c */
REGISTER_TEST_CASE(MainArg_Check);
REGISTER_TEST_CASE(MainArg_Fails);
/* test-custom-msg.c */
REGISTER_TEST_CASE(CustomMsgCheck_Fails);
REGISTER_TEST_CASE(CustomMsgCheckEqual_Fails);
REGISTER_TEST_CASE(CustomMsgClose_Fails);
REGISTER_TEST_CASE(CustomMsgAllclose_Fails);
REGISTER_TEST_CASE(CustomMsgAllCheckEqualInteger_Fails);
REGISTER_TEST_CASE(CustomMsgAllCheckEqualUnsigned_Fails);
int ret = tinytest_run();
tinytest_free();
return ret;
}
void register_tests()
{
REGISTER_TEST_CASE(importing_tests::test_import_c);
REGISTER_TEST_CASE(importing_tests::test_import_type);
}
void register_tests()
{
REGISTER_TEST_CASE(c_objects::test_custom_object);
REGISTER_TEST_CASE(c_objects::test_type_not_prematurely_used);
}
void register_tests()
{
REGISTER_TEST_CASE(evaluation_tests::test_lazy);
}
void register_tests()
{
REGISTER_TEST_CASE(ref_tests::test_refs_are_destruction_safe);
}
void register_tests()
{
REGISTER_TEST_CASE(string_test::test_sneaky_equals);
REGISTER_TEST_CASE(string_test::test_prepend);
REGISTER_TEST_CASE(string_test::test_equality_with_symbol);
}
void register_tests()
{
REGISTER_TEST_CASE(tagged_value_test::test_strict_equals);
}
void register_tests()
{
REGISTER_TEST_CASE(refactoring_tests::repro_source_after_rename);
REGISTER_TEST_CASE(refactoring_tests::test_change_function);
//TEST_DISABLED REGISTER_TEST_CASE(refactoring_tests::repro_source_after_append_code);
}
void register_tests()
{
REGISTER_TEST_CASE(importing::bug_with_is_major_block);
}
void register_tests()
{
REGISTER_TEST_CASE(block_test::test_state_type);
REGISTER_TEST_CASE(block_test::test_erase_term);
}
void register_tests()
{
REGISTER_TEST_CASE(handle::test_value_is_shared);
REGISTER_TEST_CASE(handle::test_release);
}
