aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/gen_statem_SUITE.erl
diff options
context:
space:
mode:
authorRaimo Niskanen <[email protected]>2016-02-19 15:26:33 +0100
committerRaimo Niskanen <[email protected]>2016-02-19 15:26:33 +0100
commit898e66f07dce8b7b33874255bb3ea1c6f5534d34 (patch)
treec4fc9b61822e8a5fd332ac7dc6a31a62a5ac383a /lib/stdlib/test/gen_statem_SUITE.erl
parent4d903e7e0f12d40461efda84ee169e8e65cf4c71 (diff)
downloadotp-898e66f07dce8b7b33874255bb3ea1c6f5534d34.tar.gz
otp-898e66f07dce8b7b33874255bb3ea1c6f5534d34.tar.bz2
otp-898e66f07dce8b7b33874255bb3ea1c6f5534d34.zip
Update terminology to data(), transition_op(), etc
Diffstat (limited to 'lib/stdlib/test/gen_statem_SUITE.erl')
-rw-r--r--lib/stdlib/test/gen_statem_SUITE.erl44
1 files changed, 22 insertions, 22 deletions
diff --git a/lib/stdlib/test/gen_statem_SUITE.erl b/lib/stdlib/test/gen_statem_SUITE.erl
index 4ac4acd189..65a8d35645 100644
--- a/lib/stdlib/test/gen_statem_SUITE.erl
+++ b/lib/stdlib/test/gen_statem_SUITE.erl
@@ -573,10 +573,10 @@ call_format_status(Config) when is_list(Config) ->
error_format_status(Config) when is_list(Config) ->
error_logger_forwarder:register(),
OldFl = process_flag(trap_exit, true),
- StateData = "called format_status",
+ Data = "called format_status",
{ok,Pid} =
gen_statem:start(
- ?MODULE, start_arg(Config, {state_data,StateData}), []),
+ ?MODULE, start_arg(Config, {data,Data}), []),
%% bad return value in the gen_statem loop
{{bad_return_value,badreturn},_} =
?EXPECT_FAILURE(gen_statem:call(Pid, badreturn), Reason),
@@ -585,7 +585,7 @@ error_format_status(Config) when is_list(Config) ->
{Pid,
"** State machine"++_,
[Pid,{{call,_},badreturn},
- {formatted,idle,StateData},
+ {formatted,idle,Data},
exit,{bad_return_value,badreturn}|_]}} ->
ok;
Other when is_tuple(Other), element(1, Other) =:= error ->
@@ -609,10 +609,10 @@ error_format_status(Config) when is_list(Config) ->
terminate_crash_format(Config) when is_list(Config) ->
error_logger_forwarder:register(),
OldFl = process_flag(trap_exit, true),
- StateData = crash_terminate,
+ Data = crash_terminate,
{ok,Pid} =
gen_statem:start(
- ?MODULE, start_arg(Config, {state_data,StateData}), []),
+ ?MODULE, start_arg(Config, {data,Data}), []),
stop_it(Pid),
Self = self(),
receive
@@ -621,7 +621,7 @@ terminate_crash_format(Config) when is_list(Config) ->
"** State machine"++_,
[Pid,
{{call,{Self,_}},stop},
- {formatted,idle,StateData},
+ {formatted,idle,Data},
exit,{crash,terminate}|_]}} ->
ok;
Other when is_tuple(Other), element(1, Other) =:= error ->
@@ -647,7 +647,7 @@ get_state(Config) when is_list(Config) ->
State = self(),
{ok,Pid} =
gen_statem:start(
- ?MODULE, start_arg(Config, {state_data,State}), []),
+ ?MODULE, start_arg(Config, {data,State}), []),
{idle,State} = sys:get_state(Pid),
{idle,State} = sys:get_state(Pid, 5000),
stop_it(Pid),
@@ -656,7 +656,7 @@ get_state(Config) when is_list(Config) ->
%% already checked by the previous test)
{ok,Pid2} =
gen_statem:start(
- {local,gstm}, ?MODULE, start_arg(Config, {state_data,State}), []),
+ {local,gstm}, ?MODULE, start_arg(Config, {data,State}), []),
{idle,State} = sys:get_state(gstm),
{idle,State} = sys:get_state(gstm, 5000),
stop_it(Pid2),
@@ -664,7 +664,7 @@ get_state(Config) when is_list(Config) ->
%% check that get_state works when pid is sys suspended
{ok,Pid3} =
gen_statem:start(
- ?MODULE, start_arg(Config, {state_data,State}), []),
+ ?MODULE, start_arg(Config, {data,State}), []),
{idle,State} = sys:get_state(Pid3),
ok = sys:suspend(Pid3),
{idle,State} = sys:get_state(Pid3, 5000),
@@ -676,7 +676,7 @@ replace_state(Config) when is_list(Config) ->
State = self(),
{ok, Pid} =
gen_statem:start(
- ?MODULE, start_arg(Config, {state_data,State}), []),
+ ?MODULE, start_arg(Config, {data,State}), []),
{idle,State} = sys:get_state(Pid),
NState1 = "replaced",
Replace1 = fun({StateName, _}) -> {StateName,NState1} end,
@@ -1124,8 +1124,8 @@ init(hiber) ->
{ok,hiber_idle,[]};
init(hiber_now) ->
{ok,hiber_idle,[],[hibernate]};
-init({state_data, StateData}) ->
- {ok,idle,StateData};
+init({data, Data}) ->
+ {ok,idle,Data};
init({init_ops,Arg,InitOps}) ->
case init(Arg) of
{ok,State,Data,Ops} ->
@@ -1136,7 +1136,7 @@ init({init_ops,Arg,InitOps}) ->
Other
end;
init([]) ->
- {ok,idle,state_data}.
+ {ok,idle,data}.
terminate(_, _State, crash_terminate) ->
exit({crash,terminate});
@@ -1362,20 +1362,20 @@ unwrap_state(State) ->
wrap_result(Result) ->
case Result of
- {next_state,NewState,NewStateData} ->
- {next_state,[NewState],NewStateData};
- {next_state,NewState,NewStateData,StateOps} ->
- {next_state,[NewState],NewStateData,StateOps};
+ {next_state,NewState,NewData} ->
+ {next_state,[NewState],NewData};
+ {next_state,NewState,NewData,StateOps} ->
+ {next_state,[NewState],NewData,StateOps};
Other ->
Other
end.
-code_change(_OldVsn, State, StateData, _Extra) ->
- {ok,State,StateData}.
+code_change(_OldVsn, State, Data, _Extra) ->
+ {ok,State,Data}.
-format_status(terminate, [_Pdict,State,StateData]) ->
- {formatted,State,StateData};
-format_status(normal, [_Pdict,_State,_StateData]) ->
+format_status(terminate, [_Pdict,State,Data]) ->
+ {formatted,State,Data};
+format_status(normal, [_Pdict,_State,_Data]) ->
[format_status_called].