diff options
| author | Peter Andersson <[email protected]> | 2010-06-03 22:48:10 +0200 |
|---|---|---|
| committer | Raimo Niskanen <[email protected]> | 2010-06-09 16:19:22 +0200 |
| commit | 470063d25f6128ef83cba6864533fc05e45cca74 (patch) | |
| tree | 25ce6cdf511d7ff435e60c208a5eb510f5720ff3 /lib/common_test/src/vts.erl | |
| parent | 7ce6aa16313d159b1994bf1d2f18b52bd91e9075 (diff) | |
| download | otp-470063d25f6128ef83cba6864533fc05e45cca74.tar.gz otp-470063d25f6128ef83cba6864533fc05e45cca74.tar.bz2 otp-470063d25f6128ef83cba6864533fc05e45cca74.zip | |
Flush old DOWN messages in demonitor
Diffstat (limited to 'lib/common_test/src/vts.erl')
| -rw-r--r-- | lib/common_test/src/vts.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/common_test/src/vts.erl b/lib/common_test/src/vts.erl index c94a796ab8..22399aff2a 100644 --- a/lib/common_test/src/vts.erl +++ b/lib/common_test/src/vts.erl @@ -100,7 +100,7 @@ start_link() -> MRef = erlang:monitor(process,Pid), receive {Pid,started} -> - erlang:demonitor(MRef), + erlang:demonitor(MRef, [flush]), {ok,Pid}; {'DOWN',MRef,process,_,Reason} -> {error,{vts,died,Reason}} @@ -259,7 +259,7 @@ call(Msg) -> Pid ! {Msg,{self(),Ref}}, receive {Ref, Result} -> - erlang:demonitor(MRef), + erlang:demonitor(MRef, [flush]), Result; {'DOWN',MRef,process,_,Reason} -> {error,{process_down,Pid,Reason}} |