anchor.diff:  
   -record(concuerror_info, {
             after_timeout              :: 'infinite' | integer(),
  -          caught_signal = false      :: boolean(),
             escaped_pdict = []         :: term(),
             ets_tables                 :: ets_tables(),
  +          exit_by_signal = false     :: boolean(),
             exit_reason = normal       :: term(),
             extra                      :: term(),
             flags = #process_flags{}   :: #process_flags{},
  
positive.code:                       process_loop(Info);
                      false ->
                        ?debug_flag(?loop, error_signal),
                        exiting(Reason, [], Info#concuerror_info{caught_signal = true})
                    end
                end
            end;
  
negative.code:   true = ets:update_element(Processes, self(), Updates),
    Info#concuerror_info{status = Status}.
  
  is_active(#concuerror_info{exit_by_signal = ExitBySignal, status = Status}) ->
    not ExitBySignal andalso is_active(Status);
  is_active(Status) when is_atom(Status) ->
    (Status =:= running) orelse (Status =:= waiting).
  
  