1499
1499
test_exc(#exc{mixed = true}, _, _, {Env, Local}) ->
1500
1500
{reply, {'EXCEPTION', ?tr_mixed}, {Env, ?etr_set_exc(Local, ?tr_mixed)}};
1501
test_exc(#exc{rollback = true}, commit, _, {Env, Local}) ->
1502
{reply, {'EXCEPTION', ?tr_mixed}, {Env, ?etr_set_exc(Local, ?tr_mixed)}};
1503
test_exc(#exc{commit = true}, rollback, _, {Env, Local}) ->
1504
{reply, {'EXCEPTION', ?tr_mixed}, {Env, ?etr_set_exc(Local, ?tr_mixed)}};
1501
% Left out for now to avoid dialyzer warning.
1502
%test_exc(#exc{rollback = true}, commit, _, {Env, Local}) ->
1503
% {reply, {'EXCEPTION', ?tr_mixed}, {Env, ?etr_set_exc(Local, ?tr_mixed)}};
1504
% Left out for now to avoid dialyzer warning.
1505
%test_exc(#exc{commit = true}, rollback, _, {Env, Local}) ->
1506
% {reply, {'EXCEPTION', ?tr_mixed}, {Env, ?etr_set_exc(Local, ?tr_mixed)}};
1505
1507
test_exc(#exc{hazard = true}, _, _, {Env, Local}) ->
1506
1508
{reply, {'EXCEPTION', ?tr_hazard}, {Env, ?etr_set_exc(Local, ?tr_hazard)}};
1507
1509
test_exc(_, _, {'EXCEPTION', E}, {Env, Local})