diff options
| author | Sverker Eriksson <[email protected]> | 2016-05-20 15:56:56 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2016-05-25 14:29:30 +0200 |
| commit | dcaa52d75e3bcbc808696597a34f2fca5677fff9 (patch) | |
| tree | e2ea3b21d680442d31dbaaf51886b682b6f4e410 /erts/emulator/test/bif_SUITE.erl | |
| parent | f9cb80861f169743a96099a06d68149a91f18dfa (diff) | |
| download | otp-dcaa52d75e3bcbc808696597a34f2fca5677fff9.tar.gz otp-dcaa52d75e3bcbc808696597a34f2fca5677fff9.tar.bz2 otp-dcaa52d75e3bcbc808696597a34f2fca5677fff9.zip | |
erts: Make erlang:halt/2 truncate string arg
if too long.
Diffstat (limited to 'erts/emulator/test/bif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/bif_SUITE.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/erts/emulator/test/bif_SUITE.erl b/erts/emulator/test/bif_SUITE.erl index 26bb416bf0..ec6cb6ab72 100644 --- a/erts/emulator/test/bif_SUITE.erl +++ b/erts/emulator/test/bif_SUITE.erl @@ -646,6 +646,8 @@ erlang_halt(Config) when is_list(Config) -> {badrpc,nodedown} = rpc:call(N2, erlang, halt, [0]), {ok,N3} = slave:start(H, halt_node3), {badrpc,nodedown} = rpc:call(N3, erlang, halt, [0,[]]), + {ok,N4} = slave:start(H, halt_node4), + {badrpc,nodedown} = rpc:call(N4, erlang, halt, [lists:duplicate(300,$x)]), % This test triggers a segfault when dumping a crash dump % to make sure that we can handle it properly. |