@X @~
~V7 56 2 -5
~D10
~H                    MUSS
~
~
~D10
~H            MTL102
~D10
~MMANCHESTER UNIVERSITY  -  CONFIDENTIAL~
~
~
                                                             ISSUE 11~
~V9 -1
~P
~V9 1
~YMTL102
~Y
~V9 -1
~P
~D15
~HFLOWCHARTS
~
~
~H               MTL102
~V9 -1
~F
@TITLE MTL10(2,6)
@COL 1S-2R-3R-4F
@FLOW 1-2-3-4
@BOX 1.0
RUNTIME DIAGNOSTICS
@BOX 2.0
THIS MODULE EXPORTS TL.SET.TRAPS
WHICH WHEN CALLED DOES NOTHING
SO THAT RUNTIME DIAGNOSTIC PACKAGE
IS NOT INVOKED WHEN RUN TIME ERRORS OCCUR
@BOX 3.0
AND TL.TRACE
@BOX 4.0
END
@BOX 1.1
MODULE (TL.SET.TRAPS, TL.TRACE);
LSPEC TL.SET.TRAPS();
LSPEC TL.TRACE($IN);
@BOX 2.1
PROC TL.SET.TRAPS;
END;
@BOX 3.1
PROC TL.TRACE(P1);
END;
@BOX 4.1
*END
@END

