diff options
author | Björn Gustavsson <[email protected]> | 2019-05-21 10:43:56 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2019-05-21 12:25:50 +0200 |
commit | da08da374cfa652374ddb46846550cc83798c2ab (patch) | |
tree | fa87277d115aeed9bdc6ec51936e88a42ad78f9b /lib/erl_interface/test/ei_decode_encode_SUITE.erl | |
parent | b928e601fcff6df38d7c914050f21db3f85f2d83 (diff) | |
download | otp-da08da374cfa652374ddb46846550cc83798c2ab.tar.gz otp-da08da374cfa652374ddb46846550cc83798c2ab.tar.bz2 otp-da08da374cfa652374ddb46846550cc83798c2ab.zip |
Correct decoding of external funs
Diffstat (limited to 'lib/erl_interface/test/ei_decode_encode_SUITE.erl')
-rw-r--r-- | lib/erl_interface/test/ei_decode_encode_SUITE.erl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/erl_interface/test/ei_decode_encode_SUITE.erl b/lib/erl_interface/test/ei_decode_encode_SUITE.erl index 3451d9f503..0204b4cfd6 100644 --- a/lib/erl_interface/test/ei_decode_encode_SUITE.erl +++ b/lib/erl_interface/test/ei_decode_encode_SUITE.erl @@ -48,7 +48,8 @@ init_per_testcase(Case, Config) -> test_ei_decode_encode(Config) when is_list(Config) -> P = runner:start(Config, ?test_ei_decode_encode), - Fun = fun (X) -> {X,true} end, + Fun1 = fun (X) -> {X,true} end, + Fun2 = fun runner:init_per_testcase/3, Pid = self(), Port = case os:type() of {win32,_} -> @@ -70,7 +71,8 @@ test_ei_decode_encode(Config) when is_list(Config) -> BigLargeB = 1 bsl 11112 + BigSmallB, BigLargeC = BigSmallA * BigSmallB * BigSmallC * BigSmallA, - send_rec(P, Fun), + send_rec(P, Fun1), + send_rec(P, Fun2), send_rec(P, Pid), send_rec(P, Port), send_rec(P, Ref), @@ -115,7 +117,7 @@ test_ei_decode_encode(Config) when is_list(Config) -> send_rec(P, {}), send_rec(P, {atom, Pid, Port, Ref}), send_rec(P, [atom, Pid, Port, Ref]), - send_rec(P, [atom | Fun]), + send_rec(P, [atom | Fun1]), send_rec(P, #{}), send_rec(P, #{key => value}), send_rec(P, maps:put(Port, Ref, #{key => value, key2 => Pid})), |