Remove debug message

afanfa · afanfa · commit 116c59ea6c8b · 2019-04-29T16:07:31.000-05:00
diff --git a/src/mpi/mpi_caf.c b/src/mpi/mpi_caf.c
@@ -7380,8 +7380,6 @@ PREFIX(co_broadcast) (gfc_descriptor_t *a, int source_image, int *stat,
     size *= dimextent;
   }
 
-  printf("DTYPE Size: %d\n",GFC_DESCRIPTOR_SIZE(a));
-
   if (rank == 0)
   {
     if( datatype == MPI_BYTE)

Original file line number	Diff line number	Diff line change
`@@ -7380,8 +7380,6 @@ PREFIX(co_broadcast) (gfc_descriptor_t a, int source_image, int stat,`
`7380`	`7380`	`size *= dimextent;`
`7381`	`7381`	`}`
`7382`	`7382`
`7383`		`- printf("DTYPE Size: %d\n",GFC_DESCRIPTOR_SIZE(a));`
`7384`		`-`
`7385`	`7383`	`if (rank == 0)`
`7386`	`7384`	`{`
`7387`	`7385`	`if( datatype == MPI_BYTE)`