Parent Directory | Revision Log | Revision Graph | Patch
revision 1.10 by cnh, Fri Sep 21 03:54:34 2001 UTC | revision 1.11 by edhill, Tue Nov 11 20:38:26 2003 UTC | |
---|---|---|
# | Line 89 C but this causes KAP to insert a | Line 89 C but this causes KAP to insert a |
89 | ENDIF | ENDIF |
90 | IF ( numberThreadsRunning .NE. nThreads ) THEN | IF ( numberThreadsRunning .NE. nThreads ) THEN |
91 | #ifdef HAVE_SYSTEM | #ifdef HAVE_SYSTEM |
#ifndef TARGET_T3E | ||
#ifndef TARGET_CRAY_VECTOR | ||
92 | CALL SYSTEM('sleep 1') | CALL SYSTEM('sleep 1') |
93 | #endif | #endif |
#endif | ||
#endif | ||
94 | GOTO 10 | GOTO 10 |
95 | ENDIF | ENDIF |
96 | 11 CONTINUE | 11 CONTINUE |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |