t$trac (6) --- trace routine for Ratfor programs         03/25/82


            _C_a_l_l_i_n_g _I_n_f_o_r_m_a_t_i_o_n

                 subroutine t$trac (mode, name)
                 integer mode
                 integer name (ARB)

                 Library:  vswtlb (standard Subsystem library)


            _F_u_n_c_t_i_o_n

                 'T$trac'  is  called  from  traced  Ratfor  programs  (those
                 processed with the "-t"  option).   Calls  to  't$trac'  are
                 planted  in  the  Fortran  output  of  Ratfor  as  the first
                 executable  statement  of  each  routine  and  before   each
                 "return" and "stop".

                 'Mode' is 1 for subprogram entry, 2 for subprogram exit, and
                 3  for initialization of the indentation level.  'Name' is a
                 period-terminated packed string containing the name  of  the
                 routine  being traced.  It need be supplied only when 'mode'
                 has a value of 1 (subprogram entry).

                 'T$trac' produces an indented listing with vertical lines to
                 help connect  subprogram  entry  and  exit.   The  trace  is
                 produced on ERROUT.


            _I_m_p_l_e_m_e_n_t_a_t_i_o_n

                 A  level  counter  is  maintained to determine the amount of
                 indentation; simple output statements produce the trace.


            _C_a_l_l_s

                 putch, print


            _S_e_e _A_l_s_o

                 t$entr (6), t$exit (6), t$clup (6), t$time (6), rp (1)
















            t$trac (6)                    - 1 -                    t$trac (6)