Obtener el estado gen_server / gen_fsm para la depuración

¿Es posible obtener el estado actual de ungen_server proceso (presumiblemente enviando algún mensaje del sistema)? Podría ser útil al depurar.

Por supuesto, puedo agregar un mensaje que devuelve el estado actual ahandle_call:

get_state(Server) -> gen_server:call(Server, '$get_state').

%% in every gen_server I want to debug
...
handle_call('$get_state', _From, State) ->
  {reply, State, State};
...

pero ¿hay algo incorporado (incluso si es un poco hacky)?

Respuestas a la pregunta(1)

Su respuesta a la pregunta