
{   Define monitor fault buffer contents for monitor fault sent when task is
{ determined to be broken.
{
{ NOTE: If TYPE declarations or record fields are added/changed/deleted, please
{   make the appropriate changes in the corresponding display procedures in the
{   module(s) for the System Core Debugger: SYM$DEBUG, SYM$DEBUG1
{

  TYPE
    tmt$broken_task_monitor_fault = record
      trap_enable: ost$trap_enable,
      case broken_task_condition: tmt$broken_task_condition of
      = tmc$btc_system_error =
        caller_p_register: ost$p_register,
        status_p: ^ost$status,
        text_p: ^string (*),
      = tmc$btc_mntr_fault_buffer_full, tmc$btc_mf_traps_disabled,
          tmc$btc_invalid_a0, tmc$btc_invalid_p,
          tmc$btc_mcr_traps_disabled, tmc$btc_ucr_traps_disabled =
        p: ost$p_register,
        a0: ^cell,
        monitor_condition_register: ost$monitor_conditions,
        user_condition_register: ost$user_conditions,
        monitor_fault_id: tmt$monitor_fault_identifiers,
      casend,
    recend;

*copyc TMT$BROKEN_TASK_CONDITION
*copyc OSD$CONDITIONS
*copyc OSD$REGISTERS
*copyc OST$TRAP_ENABLE
*copyc OST$MONITOR_FAULT
*copyc OST$STATUS
