diff options
| author | John Högberg <[email protected]> | 2017-10-24 09:44:10 +0200 |
|---|---|---|
| committer | John Högberg <[email protected]> | 2017-11-30 15:44:35 +0100 |
| commit | 592305b208d92067bb6dd909f699c1b8c2e5cd22 (patch) | |
| tree | 34f131f25a822545ef3c3005f1430bcb763d10e3 /lib/stdlib/test | |
| parent | 93365454e55c7fc9f78f52e5a383f57a32b92de1 (diff) | |
| download | otp-592305b208d92067bb6dd909f699c1b8c2e5cd22.tar.gz otp-592305b208d92067bb6dd909f699c1b8c2e5cd22.tar.bz2 otp-592305b208d92067bb6dd909f699c1b8c2e5cd22.zip | |
Remove port subtest in qlc_SUITE:sort
This subtest revolves around the possibility that the underlying
port can be killed, which is nonsense now that the file suite no
longer uses ports for anything.
Diffstat (limited to 'lib/stdlib/test')
| -rw-r--r-- | lib/stdlib/test/qlc_SUITE.erl | 23 |
1 files changed, 1 insertions, 22 deletions
diff --git a/lib/stdlib/test/qlc_SUITE.erl b/lib/stdlib/test/qlc_SUITE.erl index 949142ec77..8f8a0f6e73 100644 --- a/lib/stdlib/test/qlc_SUITE.erl +++ b/lib/stdlib/test/qlc_SUITE.erl @@ -1695,28 +1695,7 @@ sort(Config) when is_list(Config) -> [true || I <- lists:seq(1, 50000), not ets:insert(E, {I, I})], H = qlc:q([{X,Y} || X <- [a,b], Y <- qlc:sort(ets:table(E))]), 100000 = length(qlc:e(H)), - ets:delete(E)">>, - - begin - TmpDir = ?privdir, - [<<"TE = process_flag(trap_exit, true), - E = ets:new(foo, []), - [true || I <- lists:seq(1, 50000), not ets:insert(E, {I, I})], - Ports = erlang:ports(), - H = qlc:q([{X,Y} || X <- [a,b], - begin - [P] = erlang:ports() -- Ports, - exit(P, port_exit), - true - end, - Y <- qlc:sort(ets:table(E), - [{tmpdir,\"">>, - TmpDir, <<"\"}])]), - {error, qlc, {file_error, _, _}} = (catch qlc:e(H)), - receive {'EXIT', _, port_exit} -> ok end, - ets:delete(E), - process_flag(trap_exit, TE)">>] - end + ets:delete(E)">> ], run(Config, Ts), |