?? LEFT := 1, RIGHT := 110 ??
?? FMT (FORMAT := ON, keyw := upper, ident := lower) ??
?? NEWTITLE := 'NOS/VE: Program Control - Preemptive Communications' ??
MODULE tmm$dispose_of_ring3_preempts;
{   PURPOSE:
{     The purpose of this module is to execute with the privileges necessary
{     to call a signal/flag handler from within its execution bracket.

{   DESIGN:
{    The procedures contained in this module have an execution bracket
{    of 2, 3 and a call bracket of 3.
?? NEWTITLE := '  tmm$dispose_of_ring3_preempts - Global External Procedures' ??
?? EJECT ??
*copyc I#DISABLE_TRAPS
*copyc I#ENABLE_TRAPS
*copyc I#RESTORE_TRAPS

?? TITLE := '  tmm$dispose_of_ring3_preempts - External Procedures' ??
?? EJECT ??

*copyc TMH$FIND_FLAG_TO_PROCESS
*copyc TMP$FIND_FLAG_TO_PROCESS

*copyc TMH$FIND_SIGNAL
*copyc TMP$FIND_SIGNAL
?? TITLE := '  [XDCL] tmp$dispose_of_ring3_flags' ??
?? EJECT ??

  PROCEDURE [XDCL] tmp$dispose_of_ring3_flags;
*copyc TMH$DISPOSE_OF_RING3_FLAGS

*copyc TMIDSF
  PROCEND tmp$dispose_of_ring3_flags;
?? TITLE := '  [XDCL] tmp$dispose_of_ring3_signals' ??
?? EJECT ??

  PROCEDURE [XDCL] tmp$dispose_of_ring3_signals;
*copyc TMH$DISPOSE_OF_RING3_SIGNALS

*copyc TMIDSGL
  PROCEND tmp$dispose_of_ring3_signals;

MODEND tmm$dispose_of_ring3_preempts;
