Kaynağa Gözat

格式化 调整

master
AICells 4 yıl önce
ebeveyn
işleme
0ec34c1e9e
2 değiştirilmiş dosya ile 11 ekleme ve 11 silme
  1. +4
    -4
      src/gen_ipc.erl
  2. +7
    -7
      src/gen_srv.erl

+ 4
- 4
src/gen_ipc.erl Dosyayı Görüntüle

@ -459,13 +459,13 @@ loopEntry(Parent, Debug, Module, Name, HibernateAfterTimeout, CurStatus, CurStat
NewDebug = ?SYS_DEBUG(Debug, Name, {enter, CurStatus}), NewDebug = ?SYS_DEBUG(Debug, Name, {enter, CurStatus}),
%% 强制执行{postpone,false}以确保我们的假事件被丢弃 %% 强制执行{postpone,false}以确保我们的假事件被丢弃
LastActions = MewActions ++ [{isPos, false}], LastActions = MewActions ++ [{isPos, false}],
parseEventAL(Parent, Name, Module, HibernateAfterTimeout, false, #{}, [], #{}, CurStatus, CurState, CurStatus, NewDebug, [{onevent, init_status}], true, LastActions, ?CB_FORM_EVENT).
parseEventAL(Parent, Name, Module, HibernateAfterTimeout, false, #{}, [], #{}, CurStatus, CurState, CurStatus, NewDebug, [{onevent, init_status}], true, LastActions, ?CB_FORM_EVENT).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% sys callbacks start %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% sys callbacks start %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
system_continue(Parent, Debug, {Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, IsHib}) ->
system_continue(Parent, Debug, {Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, IsHib}) ->
if if
IsHib -> IsHib ->
proc_lib:hibernate(?MODULE, wakeupFromHib, [Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, Debug, IsHib]);
proc_lib:hibernate(?MODULE, wakeupFromHib, [Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, Debug, IsHib]);
true -> true ->
receiveIng(Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, Debug, IsHib) receiveIng(Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, Timers, CurStatus, CurState, Debug, IsHib)
end. end.
@ -1597,7 +1597,7 @@ parseEnterAL(Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Post
{error, ErrorContent} -> {error, ErrorContent} ->
terminate(error, ErrorContent, ?STACKTRACE(), Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, NewTimers, CurStatus, CurState, Debug, LeftEvents); terminate(error, ErrorContent, ?STACKTRACE(), Parent, Name, Module, HibernateAfterTimeout, IsEnter, EpmHers, Postponed, NewTimers, CurStatus, CurState, Debug, LeftEvents);
{NewIsEnter, NNewTimers, NewDebug, NewIsPos, NewIsHib, DoAfter, NewNextEs} -> {NewIsEnter, NNewTimers, NewDebug, NewIsPos, NewIsHib, DoAfter, NewNextEs} ->
case NewIsEnter andalso IsCallEnter of
case NewIsEnter andalso IsCallEnter of
true -> true ->
startEnterCall(Parent, Name, Module, HibernateAfterTimeout, NewIsEnter, EpmHers, Postponed, NNewTimers, CurStatus, CurState, NewStatus, NewDebug, LeftEvents, NewNextEs, NewIsPos, NewIsHib, DoAfter); startEnterCall(Parent, Name, Module, HibernateAfterTimeout, NewIsEnter, EpmHers, Postponed, NNewTimers, CurStatus, CurState, NewStatus, NewDebug, LeftEvents, NewNextEs, NewIsPos, NewIsHib, DoAfter);
_ -> _ ->

+ 7
- 7
src/gen_srv.erl Dosyayı Görüntüle

@ -270,7 +270,7 @@ wakeupFromHib(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurSta
loopEntry(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Actions) -> loopEntry(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Actions) ->
case doParseAL(Actions, Name, Debug, false, false, Timers) of case doParseAL(Actions, Name, Debug, false, false, Timers) of
{error, ErrorContent} -> {error, ErrorContent} ->
terminate(error, ErrorContent, ?STACKTRACE(), Name, Module, Debug, Timers, CurState, []);
terminate(error, ErrorContent, ?STACKTRACE(), Name, Module, Debug, Timers, CurState, []);
{NewDebug, IsHib, DoAfter, NewTimers} -> {NewDebug, IsHib, DoAfter, NewTimers} ->
case DoAfter of case DoAfter of
{doAfter, Args} -> {doAfter, Args} ->
@ -681,7 +681,7 @@ receiveIng(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState,
{'EXIT', Parent, Reason} -> {'EXIT', Parent, Reason} ->
terminate(Reason, Reason, ?STACKTRACE(), Name, Module, Debug, Timers, CurState, Msg); terminate(Reason, Reason, ?STACKTRACE(), Name, Module, Debug, Timers, CurState, Msg);
_ -> _ ->
matchInfoMsg(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Msg)
matchInfoMsg(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Msg)
end end
after HibernateAfterTimeout -> after HibernateAfterTimeout ->
proc_lib:hibernate(?MODULE, wakeupFromHib, [Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState]) proc_lib:hibernate(?MODULE, wakeupFromHib, [Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState])
@ -692,10 +692,10 @@ matchCallMsg(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurStat
NewDebug = ?SYS_DEBUG(Debug, Name, {in, MsgEvent}), NewDebug = ?SYS_DEBUG(Debug, Name, {in, MsgEvent}),
try Module:handleCall(Request, CurState, From) of try Module:handleCall(Request, CurState, From) of
Result -> Result ->
handleCR(Parent, Name, Module, HibernateAfterTimeout, NewDebug, Timers, CurState, Result, From)
handleCR(Parent, Name, Module, HibernateAfterTimeout, NewDebug, Timers, CurState, Result, From)
catch catch
throw:Result -> throw:Result ->
handleCR(Parent, Name, Module, HibernateAfterTimeout, NewDebug, Timers, CurState, Result, From);
handleCR(Parent, Name, Module, HibernateAfterTimeout, NewDebug, Timers, CurState, Result, From);
Class:Reason:Stacktrace -> Class:Reason:Stacktrace ->
terminate(Class, Reason, Stacktrace, Name, Module, NewDebug, Timers, CurState, MsgEvent) terminate(Class, Reason, Stacktrace, Name, Module, NewDebug, Timers, CurState, MsgEvent)
end. end.
@ -739,7 +739,7 @@ doAfterCall(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState
terminate(Class, Reason, Stacktrace, Name, Module, NewDebug, Timers, CurState, MsgEvent) terminate(Class, Reason, Stacktrace, Name, Module, NewDebug, Timers, CurState, MsgEvent)
end. end.
handleCR(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Result, From) ->
handleCR(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, Result, From) ->
case Result of case Result of
ok -> ok ->
receiveIng(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, false); receiveIng(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState, false);
@ -752,7 +752,7 @@ handleCR(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, CurState,
{noreply, NewState, Actions} -> {noreply, NewState, Actions} ->
loopEntry(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, NewState, listify(Actions)); loopEntry(Parent, Name, Module, HibernateAfterTimeout, Debug, Timers, NewState, listify(Actions));
{stop, Reason, NewState} -> {stop, Reason, NewState} ->
terminate(exit, Reason, ?STACKTRACE(), Name, Module, Debug, Timers, NewState, {return, stop});
terminate(exit, Reason, ?STACKTRACE(), Name, Module, Debug, Timers, NewState, {return, stop});
{reply, Reply, NewState, Actions} -> {reply, Reply, NewState, Actions} ->
reply(From, Reply), reply(From, Reply),
NewDebug = ?SYS_DEBUG(Debug, Name, {out, Reply, From, NewState}), NewDebug = ?SYS_DEBUG(Debug, Name, {out, Reply, From, NewState}),
@ -922,7 +922,7 @@ terminate(Class, Reason, Stacktrace, Name, Module, Debug, _Timers, CurState, Msg
{exit, shutdown} -> ok; {exit, shutdown} -> ok;
{exit, {shutdown, _}} -> ok; {exit, {shutdown, _}} -> ok;
_ -> _ ->
error_info(Reason, Name, undefined, MsgEvent, Module, Debug, CurState)
error_info(Reason, Name, undefined, MsgEvent, Module, Debug, CurState)
end end
end, end,
case Stacktrace of case Stacktrace of

Yükleniyor…
İptal
Kaydet