110593     Control C Trap Handler for FORTRAN  Version: V1.05,
September 1982
 
Submitted by: T. Miles, Tri University Meson Facility, Vancouver,
Canada
 
Operating System: RSX-11M V3.2  Source Language: MACRO-11  Software
Required: One of the following: FORTRAN IV, FORTRAN IV-PLUS, or
FORTRAN 77.  Keywords: FORTRAN, Structured Languages/Programming
 
Abstract: 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:
 
. The procedure calling ITRAP executes a return
. The trap is explicitly cancelled by a call to
  UNTRAP()
. The trap is implicitly cancelled by a Control C
  trap
 
Restrictions: FORTRAN IV code must NOT be compiled with the /CD:THR
switch.
 
Media (Service Charge Code): Source Listing (BA), One RX01 Diskette
(KA)  Format: FILES-11, 600' Magnetic Tape (MA)  Format: FILES-11