Parent Directory | Revision Log | Revision Graph | Patch
revision 1.5 by adcroft, Tue Mar 14 20:28:11 2000 UTC | revision 1.6 by heimbach, Wed Jun 21 20:44:06 2000 UTC | |
---|---|---|
# | Line 77 C but this causes KAP to insert a | Line 77 C but this causes KAP to insert a |
77 | ENDIF | ENDIF |
78 | IF ( numberThreadsRunning .NE. nThreads ) THEN | IF ( numberThreadsRunning .NE. nThreads ) THEN |
79 | #ifndef TARGET_T3E | #ifndef TARGET_T3E |
80 | #ifndef TARGET_CRAY_VECTOR | |
81 | CALL SYSTEM('sleep 1') | CALL SYSTEM('sleep 1') |
82 | #endif | #endif |
83 | #endif | |
84 | GOTO 10 | GOTO 10 |
85 | ENDIF | ENDIF |
86 | 11 CONTINUE | 11 CONTINUE |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |