- if(myline==step){
- INFO3("LINE: step(%d) = Myline(%d). Broadcast my data (myport=%d).",
- step,myline,gras_os_myport());
- for (l=0;l < PROC_MATRIX_SIZE-1 ;l++) {
- INFO2("LINE: Send to %s:%d",
- gras_socket_peer_name(socket_row[l]),
- gras_socket_peer_port(socket_row[l]));
- gras_msg_send(socket_row[l],
- gras_msgtype_by_name("dataB"),
- &mydataB);
- }
-
-
- xbt_matrix_free(bB);
- bB = xbt_matrix_new_sub(mydataB,
- submatrix_size,submatrix_size,
- 0,0,NULL);
+ if (myline == step) {
+ XBT_VERB("LINE: step(%d) = Myline(%d). Broadcast my data.", step,
+ myline);
+ for (l = 0; l < PROC_MATRIX_SIZE - 1; l++) {
+ XBT_VERB("LINE: Send to %s", gras_socket_peer_name(socket_row[l]));
+ gras_msg_send(socket_row[l], "dataB", &mydataB);
+ }
+
+
+ xbt_matrix_free(bB);
+ bB = xbt_matrix_new_sub(mydataB,
+ submatrix_size, submatrix_size, 0, 0, NULL);