diff options
author | Sverker Eriksson <sverker@erlang.org> | 2015-11-04 17:55:49 +0100 |
---|---|---|
committer | Sverker Eriksson <sverker@erlang.org> | 2015-11-26 19:48:10 +0100 |
commit | 64d1a7397c53d6cca32c49af9f833cdf6d26fc6e (patch) | |
tree | 484b72c6de6329a9beb24ccb7133b6c2d8f3ce8b | |
parent | bb1869148129c8ad30167e74aa6b4d7f16798116 (diff) | |
download | erlang-64d1a7397c53d6cca32c49af9f833cdf6d26fc6e.tar.gz |
erts: Reduce alloc_SUITE:rbtree runtime for valgrind
-rw-r--r-- | erts/emulator/test/alloc_SUITE_data/rbtree.c | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/erts/emulator/test/alloc_SUITE_data/rbtree.c b/erts/emulator/test/alloc_SUITE_data/rbtree.c index eb7b36984e..38bbbdf90c 100644 --- a/erts/emulator/test/alloc_SUITE_data/rbtree.c +++ b/erts/emulator/test/alloc_SUITE_data/rbtree.c @@ -20,7 +20,7 @@ #include "testcase_driver.h" #include "allocator_test.h" -#define NO_BLOCKS 100000 +int NO_BLOCKS; #define RIGHT_VISITED (1 << 0) #define LEFT_VISITED (1 << 1) @@ -265,9 +265,10 @@ check_tree(TestCaseState_t *tcs, Allctr_t *alc, Ulong size) ASSERT(tcs, curr_blacks == 0); ASSERT(tcs, i == -1); + /* testcase_printf(tcs, "Red-Black Tree OK! Max depth = %d; " "Black depth = %d\n", max_i+1, blacks < 0 ? 0 : blacks); - + */ return res; } @@ -468,6 +469,12 @@ testcase_run(TestCaseState_t *tcs) Allctr_t *a; rbtree_test_data *td; + NO_BLOCKS = 100*1000; + if (enif_is_identical(tcs->build_type, + enif_make_atom(tcs->curr_env,"valgrind"))) { + NO_BLOCKS /= 10; + } + /* Best fit... */ testcase_printf(tcs, "Setup...\n"); |