ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libBASS/mpiBASS.c
(Generate patch)

Comparing trunk/OOPSE/libBASS/mpiBASS.c (file contents):
Revision 378 by mmeineke, Fri Mar 21 17:42:12 2003 UTC vs.
Revision 675 by mmeineke, Mon Aug 11 19:38:44 2003 UTC

# Line 47 | Line 47 | void throwMPIEvent(event* the_event)
47   {
48    mBEvent mpiEventContainer;
49    int mpiStatus;
50 –  int mpiError;
50  
51  
52    if (the_event == NULL)     mpiStatus = MPI_INTERFACE_DONE;
# Line 82 | Line 81 | void throwMPIEvent(event* the_event)
81        mpiEventContainer.i1 = the_event->evt.blk_index; // pack block index into first int
82        break;
83  
84 +    case ZCONSTRAINT:
85 +      mpiEventContainer.type = mpiZCONSTRAINT;
86 +      mpiEventContainer.i1 = the_event->evt.blk_index; // pack block index into first int
87 +      break;
88 +
89      case COMPONENT:
90        mpiEventContainer.type = mpiCOMPONENT;
91        mpiEventContainer.i1 = the_event->evt.blk_index; // pack block index into first int
# Line 164 | Line 168 | void mpiEventLoop(void)
168   // Everybody but node 0 runs this
169   void mpiEventLoop(void)
170   {
167 –  int mpiError;
171    int mpiContinue;
172  
173   #ifdef MPIBASS_VERBOSE
# Line 181 | Line 184 | void mpiEventLoop(void)
184            "  MEMBER      %d\n"
185            "  CONSTRAINT  %d\n"
186            "  ORIENTATION %d\n"
187 <          "  START_INDEX %d\n"
187 >          "  ZCONSTRAINT %d\n"
188            "  BLOCK_END   %d\n"
189            "\n",
190            worldRank,
191            MOLECULE, ATOM, BOND, BEND, TORSION, COMPONENT,
192            POSITION, ASSIGNMENT, MEMBER, CONSTRAINT, ORIENTATION,
193 <          START_INDEX, BLOCK_END );
193 >          ZCONSTRAINT, BLOCK_END );
194   #endif
195  
196    MPI_Bcast(&mpiContinue,1,MPI_INT,0,MPI_COMM_WORLD);
# Line 209 | Line 212 | void mpiCatchEvent(void)
212   {
213    event the_event;
214    mBEvent mpiEventContainer;
212 –  int mpiError;
215  
214 –
216    
217    MPI_Bcast(&mpiEventContainer,1,mpiBASSEventType,0,MPI_COMM_WORLD);
218  
# Line 240 | Line 241 | void mpiCatchEvent(void)
241      the_event.event_type = TORSION;
242      the_event.evt.blk_index = mpiEventContainer.i1;
243      break;
244 +
245 +  case mpiZCONSTRAINT:
246 +    the_event.event_type = ZCONSTRAINT;
247 +    the_event.evt.blk_index = mpiEventContainer.i1;
248 +    break;
249      
250    case mpiCOMPONENT:
251      the_event.event_type = COMPONENT;
# Line 344 | Line 350 | void mpiInterfaceExit(void){
350  
351  
352   void mpiInterfaceExit(void){
347 –  int mpiError;
353    int mpiStatus = MPI_INTERFACE_ABORT;
354    
355    MPI_Bcast(&mpiStatus,1,MPI_INT,0,MPI_COMM_WORLD);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines