aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2018-03-20 15:27:43 +0100
committerSverker Eriksson <[email protected]>2018-03-20 17:34:12 +0100
commit902e1df69542e07e7c363f5b599ac1551b8fbb64 (patch)
tree332c649994ea663967a9446bfaf5276f41a7b29a /erts/emulator/test
parent21e71598fddd8483ff0b43eca0a101aa4e3c024a (diff)
downloadotp-902e1df69542e07e7c363f5b599ac1551b8fbb64.tar.gz
otp-902e1df69542e07e7c363f5b599ac1551b8fbb64.tar.bz2
otp-902e1df69542e07e7c363f5b599ac1551b8fbb64.zip
erts: Add dynamic loaded drivers to list of "taints"
Diffstat (limited to 'erts/emulator/test')
-rw-r--r--erts/emulator/test/driver_SUITE.erl12
1 files changed, 11 insertions, 1 deletions
diff --git a/erts/emulator/test/driver_SUITE.erl b/erts/emulator/test/driver_SUITE.erl
index 294c42780d..40c7cc11e1 100644
--- a/erts/emulator/test/driver_SUITE.erl
+++ b/erts/emulator/test/driver_SUITE.erl
@@ -2589,8 +2589,18 @@ stop_driver(Port, Name) ->
ok = erl_ddll:stop().
load_driver(Dir, Driver) ->
+ Before = erlang:system_info(taints),
case erl_ddll:load_driver(Dir, Driver) of
- ok -> ok;
+ ok ->
+ After = erlang:system_info(taints),
+ case lists:member(Driver, Before) of
+ true ->
+ After = Before;
+ false ->
+ true = lists:member(Driver, After),
+ Before = lists:delete(Driver, After)
+ end,
+ ok;
{error, Error} = Res ->
io:format("~s\n", [erl_ddll:format_error(Error)]),
Res