From: mquinson <mquinson@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Tue, 4 Jul 2006 13:42:42 +0000 (+0000)
Subject: More debugging (and smaller matrices during the debugging on RL phase)
X-Git-Tag: v3.3~2883
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/82ef813a5d1cf608e1ae2a80c306a1cee9fceab1?hp=c506ba473646782a6bf6f901c543416c16ee05ae;ds=sidebyside

More debugging (and smaller matrices during the debugging on RL phase)


git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@2475 48e7efb5-ca39-0410-a469-dd3cf9ba447f
---

diff --git a/examples/gras/pmm/pmm.c b/examples/gras/pmm/pmm.c
index efbb6b0604..45f427e39b 100755
--- a/examples/gras/pmm/pmm.c
+++ b/examples/gras/pmm/pmm.c
@@ -10,10 +10,10 @@
 
 #include "gras.h"
 #include "xbt/matrix.h"
-#define PROC_MATRIX_SIZE 3
+#define PROC_MATRIX_SIZE 2
 #define SLAVE_COUNT (PROC_MATRIX_SIZE*PROC_MATRIX_SIZE)
 
-#define DATA_MATRIX_SIZE 600
+#define DATA_MATRIX_SIZE 8
 const int submatrix_size = DATA_MATRIX_SIZE/PROC_MATRIX_SIZE;
 
 XBT_LOG_NEW_DEFAULT_CATEGORY(pmm,"Parallel Matrix Multiplication");
@@ -282,7 +282,8 @@ int slave(int argc,char *argv[]) {
 	
     /* a line brodcast */
     if(myline==step){
-       INFO2("LINE: step(%d) = Myline(%d). Broadcast my data.",step,myline);
+       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++)
 	 gras_msg_send(socket_row[l], 
 		       gras_msgtype_by_name("dataB"), 
@@ -299,8 +300,8 @@ int slave(int argc,char *argv[]) {
       } CATCH(e) {
 	RETHROW0("Can't get a data message from line : %s");
       }
-      INFO3("LINE: step(%d) <> Myline(%d). Receive data from %s",step,myline,
-	    gras_socket_peer_name(from));
+      INFO4("LINE: step(%d) <> Myline(%d). Receive data from %s:%d",step,myline,
+	    gras_socket_peer_name(from), gras_socket_peer_port(from));
     }
 
     /* a row brodcast */