1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
 int
 saf_setProps_DbComm(SAF_DbProps *properties,    /* The database property list which will be modified by this function
                                                    (See Properties). */
                     MPI_Comm communicator       /* The MPI communicator. */
                     )
 {
     SAF_ENTER(saf_setProps_DbComm, SAF_PRECONDITION_ERROR);
     SAF_DbProps         *p = properties;

     SAF_REQUIRE(p, SAF_HIGH_CHK_COST, SAF_PRECONDITION_ERROR,
                 _saf_errmsg("PROPERTIES must not be null"));

     p->DbComm = communicator;
     SAF_LEAVE(SAF_SUCCESS);
 }