- double size=parse_double(size_str);
- double clock = MSG_get_clock(); /* this "call" is free thanks to inlining */
-
- sprintf(to, "%s_%s", MSG_process_get_name(MSG_process_self()),action[2]);
-
- if (XBT_LOG_ISENABLED(actions, xbt_log_priority_verbose))
- name = xbt_str_join_array(action, " ");
-
-#ifdef HAVE_TRACING
- int rank = get_rank(MSG_process_get_name(MSG_process_self()));
- int dst_traced = get_rank(action[2]);
- TRACE_smpi_ptp_in(rank, rank, dst_traced, "send");
- TRACE_smpi_send(rank, rank, dst_traced);
-#endif
-
- XBT_DEBUG("Entering Send: %s (size: %lg)", name, size);
- if (size<65536) {
- action_Isend(action);
- } else {
- MSG_task_send(MSG_task_create(name, 0, size, NULL), to);
- }
-
- XBT_VERB("%s %f", name, MSG_get_clock() - clock);