diff options
author | José Valim <[email protected]> | 2018-03-07 11:12:55 +0100 |
---|---|---|
committer | José Valim <[email protected]> | 2018-03-07 11:12:57 +0100 |
commit | a403cb1ed2cbab02fad23ac47b170dee1f22d7ec (patch) | |
tree | 836164d7d8638a96a3b640efff780aa9f3f17c08 /lib/debugger/test/int_eval_SUITE.erl | |
parent | 7304c1e1deed6ac1fbddc88ea5c6d5138231dbf7 (diff) | |
download | otp-a403cb1ed2cbab02fad23ac47b170dee1f22d7ec.tar.gz otp-a403cb1ed2cbab02fad23ac47b170dee1f22d7ec.tar.bz2 otp-a403cb1ed2cbab02fad23ac47b170dee1f22d7ec.zip |
Do not treat binaries as top level in dbg_ieval
Prior to this change, calls inside binaries were
treated as top level which would cause the `Fun(Arg)`
call inside `<<Fun(Arg)/binary>>` to return an internal
dbg_ieval tuple and ultimately error with badarg.
Diffstat (limited to 'lib/debugger/test/int_eval_SUITE.erl')
-rw-r--r-- | lib/debugger/test/int_eval_SUITE.erl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lib/debugger/test/int_eval_SUITE.erl b/lib/debugger/test/int_eval_SUITE.erl index 27ca4852b5..da1d6734f8 100644 --- a/lib/debugger/test/int_eval_SUITE.erl +++ b/lib/debugger/test/int_eval_SUITE.erl @@ -29,7 +29,8 @@ bifs_outside_erlang/1, spawning/1, applying/1, catch_and_throw/1, external_call/1, test_module_info/1, apply_interpreted_fun/1, apply_uninterpreted_fun/1, - interpreted_exit/1, otp_8310/1, stacktrace/1, maps/1]). + interpreted_exit/1, otp_8310/1, stacktrace/1, maps/1, + call_inside_binary/1]). %% Helpers. -export([applier/3]). @@ -45,7 +46,8 @@ all() -> [bifs_outside_erlang, spawning, applying, catch_and_throw, external_call, test_module_info, apply_interpreted_fun, apply_uninterpreted_fun, - interpreted_exit, otp_8310, stacktrace, maps]. + interpreted_exit, otp_8310, stacktrace, maps, + call_inside_binary]. groups() -> []. @@ -275,6 +277,9 @@ maps(Config) when is_list(Config) -> [#{hello := 0, price := 0}] = spawn_eval(fun () -> ?IM:update_in_fun() end), ok. +call_inside_binary(Config) when is_list(Config) -> + <<"1">> = ?IM:call_inside_binary(fun erlang:integer_to_binary/1), + ok. do_eval(Config, Mod) -> DataDir = proplists:get_value(data_dir, Config), |