Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.9 by adcroft, Mon May 24 14:31:23 1999 UTC | revision 1.10 by adcroft, Wed Mar 15 16:00:52 2000 UTC | |
|---|---|---|
| # | Line 66 C == Routine arguments == | Line 66 C == Routine arguments == |
| 66 | INTEGER myThid | INTEGER myThid |
| 67 | INTEGER fileHandle | INTEGER fileHandle |
| 68 | ||
| 69 | #ifdef USE_DFILE | |
| 70 | ||
| 71 | C == Local variables == | C == Local variables == |
| 72 | C msgBuf - Error message buffer | C msgBuf - Error message buffer |
| 73 | C I - Work variables | C I - Work variables |
| # | Line 780 C-- Now write meta information | Line 782 C-- Now write meta information |
| 782 | ioErrorCount(myThid) = ioErrorCount(myThid) + 1 | ioErrorCount(myThid) = ioErrorCount(myThid) + 1 |
| 783 | GOTO 1000 | GOTO 1000 |
| 784 | ||
| 785 | #endif /* USE_DFILE */ | |
| 786 | ||
| 787 | END | END |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |