Unix |
Unix v6 |
|
![]() |
ierror(3) |
![]() |
ierror catch Fortran errors if ( ierror ( errno ) .ne. 0 ) goto label provides a way of detecting errors during the running of a Fortran program. Its argument is a run-time error number such as enumerated in (I). When is called, it returns a 0 value; thus the statement in the synopsis is not executed. However, the routine stores inside itself the call point and invocation level. If and when the indicated error occurs, a is simulated from with a non-zero value; thus the (or other statement) is executed. It is a ghastly error to call from a subroutine which has already returned when the error occurs. This routine is essentially tailored to catching end-of-file situations. Typically it is called just before the start of the loop which reads the input file, and the jumps to a graceful termination of the program. There is a limit of 5 on the number of different error numbers which can be caught. fc (I) There is no way to ignore errors.
![]() |
ierror(3) | ![]() |