Changeset 3056


Ignore:
Timestamp:
02/19/10 12:03:25 (15 years ago)
Author:
Eric.Larour
Message:

No need to broadcast

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/Qmux/SpawnCoreParallel.cpp

    r3042 r3056  
    111111        #endif
    112112
    113         /*broadcast response descriptors: */
     113        /*broadcast numresponses: */
    114114        MPI_Bcast(&numresponses,1,MPI_INT,0,MPI_COMM_WORLD);
    115         if(my_rank!=0){
    116                 responses_descriptors=(char**)xmalloc(numresponses*sizeof(char*));
    117         }
    118         for(i=0;i<numresponses;i++){
    119                 if(my_rank==0){
    120                         string=responses_descriptors[i];
    121                         string_length=(strlen(string)+1)*sizeof(char);
    122                 }
    123                 MPI_Bcast(&string_length,1,MPI_INT,0,MPI_COMM_WORLD);
    124                 if(my_rank!=0)string=(char*)xmalloc(string_length);
    125                 MPI_Bcast(string,string_length,MPI_CHAR,0,MPI_COMM_WORLD);
    126                 if(my_rank!=0)responses_descriptors[i]=string;
    127         }
    128115
    129116        #ifdef _ISSM_DEBUG_
Note: See TracChangeset for help on using the changeset viewer.