Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:25
erlang
1023-timer-fix-indendation.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 1023-timer-fix-indendation.patch of Package erlang
From 2326c53741b529000636431ffdb7ed9da41558f8 Mon Sep 17 00:00:00 2001 From: Maria Scott <maria-12648430@hnc-agency.org> Date: Wed, 14 Sep 2022 19:29:04 +0200 Subject: [PATCH 3/4] timer: fix indendation --- lib/stdlib/src/timer.erl | 58 +++++++++++++++++++--------------------- 1 file changed, 28 insertions(+), 30 deletions(-) diff --git a/lib/stdlib/src/timer.erl b/lib/stdlib/src/timer.erl index 6ae09cf16e..85723478aa 100644 --- a/lib/stdlib/src/timer.erl +++ b/lib/stdlib/src/timer.erl @@ -398,12 +398,8 @@ maybe_req(Req, Arg) -> handle_call({apply_once, {Started, Time, MFA}}, _From, Tab) -> Timeout = Started + Time, Reply = try - erlang:start_timer( - Timeout, - self(), - {apply_once, MFA}, - [{abs, true}] - ) + erlang:start_timer(Timeout, self(), {apply_once, MFA}, + [{abs, true}]) of SRef -> ets:insert(Tab, {SRef}), @@ -429,11 +425,11 @@ handle_call({cancel, {once, TRef}}, _From, Tab) -> %% Cancel an interval timer. handle_call({cancel, {interval, TRef}}, _From, Tab) -> _ = case remove_timer(TRef, Tab) of - true -> - demonitor(TRef, [flush]); - false -> - ok - end, + true -> + demonitor(TRef, [flush]); + false -> + ok + end, {reply, {ok, cancel}, Tab}; %% Unexpected. handle_call(_Req, _From, Tab) -> @@ -445,11 +441,11 @@ handle_call(_Req, _From, Tab) -> %% One-shot timer timeout. handle_info({timeout, TRef, {apply_once, MFA}}, Tab) -> _ = case ets:take(Tab, TRef) of - [{TRef}] -> - do_apply(MFA, false); - [] -> - ok - end, + [{TRef}] -> + do_apply(MFA, false); + [] -> + ok + end, {noreply, Tab}; %% An interval timer loop process died. handle_info({'DOWN', TRef, process, _Pid, _Reason}, Tab) -> @@ -471,15 +467,15 @@ terminate(_Reason, undefined) -> ok; terminate(Reason, Tab) -> _ = ets:foldl(fun - ({TRef}, Acc) -> - _ = cancel_timer(TRef), - Acc; - ({_TRef, TPid, Tag}, Acc) -> - TPid ! {cancel, Tag}, - Acc - end, - undefined, - Tab), + ({TRef}, Acc) -> + _ = cancel_timer(TRef), + Acc; + ({_TRef, TPid, Tag}, Acc) -> + TPid ! {cancel, Tag}, + Acc + end, + undefined, + Tab), true = ets:delete(Tab), terminate(Reason, undefined). @@ -492,11 +488,13 @@ start_interval_loop(Started, Time, TargetPid, MFA, WaitComplete) -> Tag = make_ref(), TimeServerPid = self(), {TPid, TRef} = spawn_monitor(fun() -> - TimeServerRef = monitor(process, TimeServerPid), - TargetRef = monitor(process, TargetPid), - TimerRef = schedule_interval_timer(Started, Time, MFA), - _ = interval_loop(TimeServerRef, TargetRef, Tag, WaitComplete, TimerRef) - end), + TimeServerRef = monitor(process, TimeServerPid), + TargetRef = monitor(process, TargetPid), + TimerRef = schedule_interval_timer(Started, Time, + MFA), + _ = interval_loop(TimeServerRef, TargetRef, Tag, + WaitComplete, TimerRef) + end), {TRef, TPid, Tag}. %% Interval timer loop. -- 2.35.3
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor