FDS provides Fortran programmers with tools to aid debugging, including a dynamic debugging routine for TSS, routines to provide symbolic dumps of all your variables, a method that permits you to call your own routines when your program terminates, and a routine that displays how much time you spend in each section of your program.
FDS is already built into the system for you to use, including the symbol tables which let FDS identify your variables. The inclusion of the symbol tables has no effect on the speed at which your program runs, but it does increase the memory requirements, depending on how many variables you have. To get rid of the symbol tables, use the NFDS option on your $FORTRAN or $FORT77 card in batch, or use the "-Tables" option in the FTN or F77 command in TSS.
When a program is being used in a production environment, it may be necessary to inhibit the use of debugging aids in order to prevent inadvertent disclosure of sensitive data, or in order to prevent the debugger from being called. You can do this by supplying dummy versions of the FDUMP and FDEBUG subroutines, as follows.
SUBROUTINE FDUMP RETURN END SUBROUTINE FDEBUG RETURN END
Another way to get rid of FDEBUG (or FDUMP) would be
EXTERNAL FDEBUG CALL NOCALL(FDEBUG)
expl fort lib fdebug expl fort lib fdump expl fort lib ftimer expl fort lib wrapup
Copyright © 1996, Thinkage Ltd.