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 enable FDS to 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 core requirements, depending on how many variables you have. To get rid of the symbol tables, use the NFDS option on your $FORTRAN card in batch, or use the "-Tables" option in the FTN 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. This can be accomplished very simply 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)
Copyright © 1996, Thinkage Ltd.