diff options
author | Sverker Eriksson <[email protected]> | 2013-11-25 19:41:41 +0100 |
---|---|---|
committer | Sverker Eriksson <[email protected]> | 2013-11-26 15:11:09 +0100 |
commit | 272ffa2e678fb4d118cf4b78d1fb0c4f3f8d8f94 (patch) | |
tree | 8543951729ad8cc7888b2f0ab060097b0ec51f05 /lib/kernel | |
parent | 666884a245fd57f04e0a15b0602c46bf271966f0 (diff) | |
download | otp-272ffa2e678fb4d118cf4b78d1fb0c4f3f8d8f94.tar.gz otp-272ffa2e678fb4d118cf4b78d1fb0c4f3f8d8f94.tar.bz2 otp-272ffa2e678fb4d118cf4b78d1fb0c4f3f8d8f94.zip |
kernel: Fix zlib_SUITE:large_deflate
Commontest doesn't like arity 0 function with same name as test case.
Diffstat (limited to 'lib/kernel')
-rw-r--r-- | lib/kernel/test/zlib_SUITE.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/kernel/test/zlib_SUITE.erl b/lib/kernel/test/zlib_SUITE.erl index bd237cb513..e91f6f18d4 100644 --- a/lib/kernel/test/zlib_SUITE.erl +++ b/lib/kernel/test/zlib_SUITE.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2005-2012. All Rights Reserved. +%% Copyright Ericsson AB 2005-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -565,8 +565,8 @@ intro(Config) when is_list(Config) -> large_deflate(doc) -> "Test deflate large file, which had a bug reported on erlang-bugs"; large_deflate(suite) -> []; large_deflate(Config) when is_list(Config) -> - large_deflate(). -large_deflate() -> + large_deflate_do(). +large_deflate_do() -> ?line Z = zlib:open(), ?line Plain = rand_bytes(zlib:getBufSize(Z)*5), ?line ok = zlib:deflateInit(Z), @@ -899,7 +899,7 @@ worker(Seed, FnATpl, Parent) -> Parent ! self(). worker_loop(0, _FnATpl) -> - large_deflate(), % the time consuming one as finale + large_deflate_do(), % the time consuming one as finale ok; worker_loop(N, FnATpl) -> {F,A} = element(random:uniform(size(FnATpl)),FnATpl), |