File 0393-stop-tprof-servers.patch of Package erlang
From 80a86e126699bcbac8f3141273abeff969ed494d Mon Sep 17 00:00:00 2001
From: ruslandoga <ruslandoga+gh@icloud.com>
Date: Wed, 26 Mar 2025 20:56:50 +0300
Subject: [PATCH 3/5] stop tprof servers
---
lib/tools/test/tprof_SUITE.erl | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/lib/tools/test/tprof_SUITE.erl b/lib/tools/test/tprof_SUITE.erl
index 172559271f..5f91345a35 100644
--- a/lib/tools/test/tprof_SUITE.erl
+++ b/lib/tools/test/tprof_SUITE.erl
@@ -307,12 +307,12 @@ separate_sessions() ->
separate_sessions(Config) when is_list(Config) ->
%% Trace lists:reverse/1
- {ok, Srv1} = tprof:start_link(#{session => session1, type => call_memory}),
+ {ok, Srv1} = tprof:start_link(#{session => tprof_SUEITE_separate_sessions_1, type => call_memory}),
tprof:set_pattern(Srv1, lists, reverse, 1),
tprof:enable_trace(Srv1, self(), #{}),
%% Trace lists:map/2
- {ok, Srv2} = tprof:start_link(#{session => session2, type => call_memory}),
+ {ok, Srv2} = tprof:start_link(#{session => tprof_SUEITE_separate_sessions_2, type => call_memory}),
tprof:set_pattern(Srv2, lists, map, 2),
tprof:enable_trace(Srv2, self(), #{}),
@@ -324,7 +324,10 @@ separate_sessions(Config) when is_list(Config) ->
ProcInspected1 = tprof:inspect(Profile1),
ProcInspected2 = tprof:inspect(Profile2),
- ?assertNotEqual(ProcInspected1, ProcInspected2).
+ tprof:stop(Srv1),
+ tprof:stop(Srv2),
+
+ ?assertNotEqual(ProcInspected1, ProcInspected2).
live_trace() ->
[{doc, "Tests memory tracing for pre-existing processes"}].
--
2.43.0