- char *old_file=e.file;
- /* The callback raised an exception, propagate it on the network */
- if (!e.remote) {
- /* Make sure we reduce the file name to its basename to avoid issues in tests */
- char *new_file=strrchr(e.file,'/');
- if (new_file)
- e.file = new_file;
- /* the exception is born on this machine */
- e.host = (char*)gras_os_myname();
- xbt_ex_setup_backtrace(&e);
- }
- VERB5("Propagate %s exception ('%s') from '%s' RPC cb back to %s:%d",
- (e.remote ? "remote" : "local"),
- e.msg,
- msg.type->name,
- gras_socket_peer_name(msg.expe),
- gras_socket_peer_port(msg.expe));
- gras_msg_send_ext(msg.expe, e_gras_msg_kind_rpcerror,
- msg.ID, msg.type, &e);
- e.file=old_file;
- xbt_ex_free(e);
- ctx.answer_due = 0;
- ran_ok=1;
+ char *old_file = e.file;
+ /* The callback raised an exception, propagate it on the network */
+ if (!e.remote) {
+ /* Make sure we reduce the file name to its basename to avoid issues in tests */
+ char *new_file = strrchr(e.file, '/');
+ if (new_file)
+ e.file = new_file;
+ /* the exception is born on this machine */
+ e.host = (char *) gras_os_myname();
+ xbt_ex_setup_backtrace(&e);
+ }
+ XBT_VERB
+ ("Propagate %s exception ('%s') from '%s' RPC cb back to %s:%d",
+ (e.remote ? "remote" : "local"), e.msg, msg.type->name,
+ xbt_socket_peer_name(msg.expe),
+ xbt_socket_peer_port(msg.expe));
+ if (XBT_LOG_ISENABLED(gras_msg, xbt_log_priority_verbose))
+ xbt_ex_display(&e);
+ gras_msg_send_ext(msg.expe, e_gras_msg_kind_rpcerror,
+ msg.ID, msg.type, &e);
+ e.file = old_file;
+ xbt_ex_free(e);
+ ctx.answer_due = 0;
+ ran_ok = 1;