| # | Line 259 | Line 259 | void incr_block( block_type new_block ){ | |
|---|---|---|
| 259 | ||
| 260 | if( block_stack_ptr >= MAX_NEST ){ | |
| 261 | fprintf( stderr, "Event blocks nested too deeply\n" ); | |
| 262 | + | #ifdef MPI |
| 263 | + | mpiInterfaceExit(); |
| 264 | + | #endif |
| 265 | exit(1); | |
| 266 | } | |
| 267 | ||
| # | Line 273 | Line 276 | void decr_block( void ){ | |
| 276 | if( block_stack_ptr < 0 ){ | |
| 277 | ||
| 278 | fprintf( stderr, "Too many event blocks closed\n" ); | |
| 279 | + | #ifdef MPI |
| 280 | + | mpiInterfaceExit(); |
| 281 | + | #endif |
| 282 | exit(1); | |
| 283 | } | |
| 284 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |