diff options
| author | Sverker Eriksson <[email protected]> | 2013-04-11 11:49:13 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2013-04-11 11:49:13 +0200 |
| commit | c960a7f301bec672726d07e5355e6d048be643e9 (patch) | |
| tree | 64732a4927881013bf8db0780b71edc9f3381be5 /lib/stdlib/test/ets_SUITE.erl | |
| parent | 13bc745645b155e10ff34c611525e7870efaca56 (diff) | |
| parent | 4ca7a3e68e743964c1f22bbbeabab52508797a0e (diff) | |
| download | otp-c960a7f301bec672726d07e5355e6d048be643e9.tar.gz otp-c960a7f301bec672726d07e5355e6d048be643e9.tar.bz2 otp-c960a7f301bec672726d07e5355e6d048be643e9.zip | |
Merge branch 'sverk/dets_remove_test_otp_9607' into maint
* sverk/dets_remove_test_otp_9607:
stdlib: Fix unstable testcase ets_SUITE:delete_large_named_table
stdlib: Remove obsolete testcase dets_SUITE:otp_9607
Diffstat (limited to 'lib/stdlib/test/ets_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/ets_SUITE.erl | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl index d40609eeb0..af5d5a8f21 100644 --- a/lib/stdlib/test/ets_SUITE.erl +++ b/lib/stdlib/test/ets_SUITE.erl @@ -3268,15 +3268,14 @@ delete_large_named_table_1(Name, Flags, Data, Fix) -> end, Parent = self(), {Pid, MRef} = my_spawn_opt(fun() -> - receive - {trace,Parent,call,_} -> - ets_new(Name, [named_table]) - end - end, [link, monitor]), - ?line erlang:trace(self(), true, [call,{tracer,Pid}]), - ?line erlang:trace_pattern({ets,delete,1}, true, [global]), - ?line erlang:yield(), true = ets:delete(Tab), - ?line erlang:trace_pattern({ets,delete,1}, false, [global]), + receive + ets_new -> + ets_new(Name, [named_table]) + end + end, + [link, monitor]), + true = ets:delete(Tab), + Pid ! ets_new, receive {'DOWN',MRef,process,Pid,_} -> ok end, ok. |