Add ranch startup to machi_chain_manager1_converge_demo
This commit is contained in:
parent
c02a0bed70
commit
34f8632f19
1 changed files with 4 additions and 2 deletions
|
@ -151,7 +151,8 @@ convergence_demo_testfun(NumFLUs, MgrOpts0) ->
|
||||||
%% Faster test startup, commented: io:format(user, short_doc(), []),
|
%% Faster test startup, commented: io:format(user, short_doc(), []),
|
||||||
%% Faster test startup, commented: timer:sleep(3000),
|
%% Faster test startup, commented: timer:sleep(3000),
|
||||||
|
|
||||||
application:start(sasl),
|
Apps = [sasl, ranch],
|
||||||
|
[application:start(App) || App <- Apps],
|
||||||
|
|
||||||
MgrOpts = MgrOpts0 ++ ?DEFAULT_MGR_OPTS,
|
MgrOpts = MgrOpts0 ++ ?DEFAULT_MGR_OPTS,
|
||||||
TcpPort = proplists:get_value(port_base, MgrOpts, 62877),
|
TcpPort = proplists:get_value(port_base, MgrOpts, 62877),
|
||||||
|
@ -394,7 +395,8 @@ timer:sleep(1234),
|
||||||
exit(SupPid, normal),
|
exit(SupPid, normal),
|
||||||
ok = machi_partition_simulator:stop(),
|
ok = machi_partition_simulator:stop(),
|
||||||
[ok = ?FLU_PC:quit(PPid) || {_, PPid} <- Namez],
|
[ok = ?FLU_PC:quit(PPid) || {_, PPid} <- Namez],
|
||||||
machi_util:wait_for_death(SupPid, 100)
|
machi_util:wait_for_death(SupPid, 100),
|
||||||
|
[application:start(App) || App <- lists:reverse(Apps)]
|
||||||
end.
|
end.
|
||||||
|
|
||||||
%% Many of the static partition lists below have been problematic at one
|
%% Many of the static partition lists below have been problematic at one
|
||||||
|
|
Loading…
Reference in a new issue