.TITLE F77ABO .MCALL SVTK$S ; ; Force Fortran programs to abort. ; F77ABO:: ;Ref. label SVTK$S ;Turn off SST traps BPT ;Issue breakpoint trap ; ; Take normal exit. ; F77XIT:: ;Ref. label RETURN ;Return to caller .END