X-Git-Url: https://git.xandkar.net/?p=beam_stats.git;a=blobdiff_plain;f=src%2Fbeam_stats_delta.erl;fp=src%2Fbeam_stats_delta.erl;h=1e3bdfb17ec0987df5d6ee309192dbee870162ed;hp=8820d71b380703ac8b59b6365476b95e05c83c94;hb=9b2aef839d462e7cca81bacab0bcd624365d86a5;hpb=140077ceda11a34f4880fd2f4871b3aaab34f13d

diff --git a/src/beam_stats_delta.erl b/src/beam_stats_delta.erl
index 8820d71..1e3bdfb 100644
--- a/src/beam_stats_delta.erl
+++ b/src/beam_stats_delta.erl
@@ -61,11 +61,12 @@ gc(?T{erlang_process_info_reductions=Table}=T) ->
 -spec gc(t(), pid()) ->
     {}.
 gc(?T{erlang_process_info_reductions=Table}=T, Pid) ->
+    Next = ets:next(Table, Pid),
     case beam_stats_source:erlang_is_process_alive(Pid)
     of  true  -> true
     ;   false -> ets:delete(Table, Pid)
     end,
-    case ets:next(Table, Pid)
+    case Next
     of  '$end_of_table' ->
             {}
     ;   NextPid when is_pid(NextPid) ->