This section includes two utility programs:


FIXDISK
This routine was written after the infamous BRU wrote text all
over the boot block and home block on my system disk; this makes it very
difficult to access the disk (!). The FIXDISK routine will
pick up specific blocks from a disk using direct QIO's, modify them as
necessary, store them in a direct access file, and restore them to a
disk. I used it to get the home block and index blocks from a backup
disk, and wrote them back out to the damaged disk. After this procedure,
it was possible to get important files off that disk.
With some intelligent tinkering it might even be possible to restore
the disk to complete functionality.

WARNING: This routine is for experienced system hackers only.
Intemperate use could make some disk totally useless.

_________________

TMTRACE
This routine uses the Traceback calls automatically produced by
Fortran IV-plus to produce an execution time trace of a complex Fortran
program. Trace output looks like:

BEGIN MAIN
BEGIN SUB1
BEGIN SUB2
END SUB2 03:33:09
END SUB1 06:33:00
END MAIN 11:33:00

An entry is produced on entry to each subroutine. At that time, the
system time is stacked along with the subroutine name. When the
subroutine exits, the elapsed time for that subroutine is written,
(which includes time for any nested routines).

Questions, bug reports, etc., will be welcomed, though I
take no responsibility, etc,etc.

James A.J. Triplett
Intermetrics, Inc.
701 Concord Avenue
Cambridge, Mass 02138