diff options
| author | Lukas Larsson <[email protected]> | 2018-03-16 09:07:10 +0100 |
|---|---|---|
| committer | GitHub <[email protected]> | 2018-03-16 09:07:10 +0100 |
| commit | 845dd68493a91decc32d50cc785e6afaf9dfb6c3 (patch) | |
| tree | ca6c39477c10ff545b476a01d3fa2ae076e27bef /lib | |
| parent | 9f39cf8dc59df1d1225c8264f2cdda6a432f83c1 (diff) | |
| parent | f78c3ee64cd1328a03e4680d893ebfe8e47ac8b4 (diff) | |
| download | otp-845dd68493a91decc32d50cc785e6afaf9dfb6c3.tar.gz otp-845dd68493a91decc32d50cc785e6afaf9dfb6c3.tar.bz2 otp-845dd68493a91decc32d50cc785e6afaf9dfb6c3.zip | |
mikpe/process_info-1-no-messages/PR-1745/OTP-14986
make erlang:process_info/1 not retrieve messages
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/common_test/src/test_server_ctrl.erl | 2 | ||||
| -rw-r--r-- | lib/dialyzer/test/r9c_SUITE_data/src/mnesia/mnesia_tm.erl | 2 | ||||
| -rw-r--r-- | lib/mnesia/src/mnesia_tm.erl | 2 | ||||
| -rw-r--r-- | lib/stdlib/src/c.erl | 4 |
4 files changed, 5 insertions, 5 deletions
diff --git a/lib/common_test/src/test_server_ctrl.erl b/lib/common_test/src/test_server_ctrl.erl index a76c8c12de..4bbf290081 100644 --- a/lib/common_test/src/test_server_ctrl.erl +++ b/lib/common_test/src/test_server_ctrl.erl @@ -5167,7 +5167,7 @@ display_info([Pid|T], R, M) -> Other end, Reds = fetch(reductions, Info), - LM = length(fetch(messages, Info)), + LM = fetch(message_queue_len, Info), pformat(io_lib:format("~w", [Pid]), io_lib:format("~tw", [Call]), io_lib:format("~tw", [Curr]), Reds, LM), diff --git a/lib/dialyzer/test/r9c_SUITE_data/src/mnesia/mnesia_tm.erl b/lib/dialyzer/test/r9c_SUITE_data/src/mnesia/mnesia_tm.erl index 09e310530d..af49ceff72 100644 --- a/lib/dialyzer/test/r9c_SUITE_data/src/mnesia/mnesia_tm.erl +++ b/lib/dialyzer/test/r9c_SUITE_data/src/mnesia/mnesia_tm.erl @@ -2051,7 +2051,7 @@ display_pid_info(Pid) -> Other end, Reds = fetch(reductions, Info), - LM = length(fetch(messages, Info)), + LM = fetch(message_queue_len, Info), pformat(io_lib:format("~p", [Pid]), io_lib:format("~p", [Call]), io_lib:format("~p", [Curr]), Reds, LM) diff --git a/lib/mnesia/src/mnesia_tm.erl b/lib/mnesia/src/mnesia_tm.erl index eaebdf6d02..3f6f6c98d8 100644 --- a/lib/mnesia/src/mnesia_tm.erl +++ b/lib/mnesia/src/mnesia_tm.erl @@ -2210,7 +2210,7 @@ display_pid_info(Pid) -> Other end, Reds = fetch(reductions, Info), - LM = length(fetch(messages, Info)), + LM = fetch(message_queue_len, Info), pformat(io_lib:format("~p", [Pid]), io_lib:format("~tp", [Call]), io_lib:format("~tp", [Curr]), Reds, LM) diff --git a/lib/stdlib/src/c.erl b/lib/stdlib/src/c.erl index 3597e61c26..13f78841aa 100644 --- a/lib/stdlib/src/c.erl +++ b/lib/stdlib/src/c.erl @@ -564,7 +564,7 @@ display_info(Pid) -> Other end, Reds = fetch(reductions, Info), - LM = length(fetch(messages, Info)), + LM = fetch(message_queue_len, Info), HS = fetch(heap_size, Info), SS = fetch(stack_size, Info), iformat(w(Pid), mfa_string(Call), @@ -886,7 +886,7 @@ portinfo(Id) -> procline(Name, Info, Pid) -> Call = initial_call(Info), Reds = fetch(reductions, Info), - LM = length(fetch(messages, Info)), + LM = fetch(message_queue_len, Info), procformat(io_lib:format("~tw",[Name]), io_lib:format("~w",[Pid]), io_lib:format("~ts",[mfa_string(Call)]), |