Implement erlang:binary_to_atom/2 BIF