FXOPT - specify handling of runtime errors.

Usage:

call fxopt(ncode, continue, nprint, usealt)

Where:

All arguments are integer values.

ncode

is the error code whose error handling is being changed.

continue

0

stop the program with a Q6 abort

1

continue execution.

nprint

0

print an error message and traceback.

1

don't print anything.

usealt

0

use normal return.

1

call the alternate error procedure defined by FXALT. If this is used the setting of "continue" is ignored.

Description:

FXOPT modifies the error monitor's tables that specify what to do for each runtime error.

If "usealt" is 1 and the error specified by "ncode" occurs without an alternate error procedure being set by FXALT, then the program will abort with a Q5 abort.

Notes:

If an the alternate error procedure is specified for more than 1 type of error, you probably need to use ANYERR in order that the alternate error routine can find what type of error occured.

Some errors are sufficiently disastrous that it is foolish to attempt to continue.

See Also:

expl f77 lib anyerr, expl f77 lib fxalt, expl f77 lib fxem

for related routines.

Fortran 77 User Guide, DL13

for a list of the possible error codes.

Copyright © 1996, Thinkage Ltd.