Control C Trap Handler for Fortran ---------------------------------- This package permits the PDP-11 Fortran user to intercept the Control C character, and allows him/her to redirect program control to a user-specified line number. The package has been tested successfully under the FOR, F4P, and F77 Fortran compilers. If the FOR Fortran compiler is used, threaded code (/CD:THR) should NOT be specified. To set up the Control C trap, the Fortran user executes the following statement: IF (ITRAP()) GOTO xxx where xxx is the line number to go to on Control C The Control C trap will be cancelled under any of the following conditions: (1) The procedure calling ITRAP executes a RETURN (2) The trap is explicitly cancelled by a call to UNTRAP() (3) The trap is implicitly cancelled by a Control C trap