rtn$$ (6) --- return to stack frame of call$$            01/06/83


            _C_a_l_l_i_n_g _I_n_f_o_r_m_a_t_i_o_n

                 subroutine rtn$$

                 Library:  vswtlb (standard Subsystem library)


            _F_u_n_c_t_i_o_n

                 'Rtn$$'  unwinds  the  stack  and  returns  to  the  routine
                 (usually 'call$$') indicated by 'rtlabel' in  the  Subsystem
                 common block.


            _I_m_p_l_e_m_e_n_t_a_t_i_o_n

                 'Rtn$$'  first checks the Primos command level data flags to
                 see if the calling routine was DBG; if  so,  it  immediately
                 exits.   If it was not called by DBG, 'rtn$$' returns to the
                 routine  indicated  by  'rtlabel'  via  the  Primos  routine
                 PL1$NL.


            _C_a_l_l_s

                 Primos pl1$nl


            _S_e_e _A_l_s_o

                 call$$ (6)



























            rtn$$ (6)                     - 1 -                     rtn$$ (6)