| # | Line 7 | Line 7 | subroutine getTimes(forceTime,commTime) | |
|---|---|---|
| 7 | real :: commTime | |
| 8 | #ifdef PROFILE | |
| 9 | forceTime = getForceTime() | |
| 10 | + | |
| 11 | + | #ifdef IS_MPI |
| 12 | commTime = getCommTime() | |
| 13 | #else | |
| 14 | + | commTime = 0.0 |
| 15 | + | #endif |
| 16 | + | |
| 17 | + | #else |
| 18 | forceTime = 0.0 | |
| 19 | commTime = 0.0 | |
| 20 | #endif | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |