
 CONST
    nac$max_queued_network_messages = 0ffff(16);

 TYPE
    nat$open_network_sap_descriptor = record
      link: ^nat$open_network_sap_descriptor,
      sap: nat$network_sap_identifier,
      queued_messages: 0 .. nac$max_queued_network_messages,
      event_queue: ^nat$network_event,
      case waiting_task_specified: boolean of
      = TRUE =
        waiting_task_id: ost$global_task_id,
      casend,
    recend,

    nat$network_event = record
      link: ^nat$network_event,
      message_id: nlt$bm_message_id,
      source: nat$network_layer_address,
    recend;

*copyc nat$network_layer_address
*copyc nat$network_sap_identifier
*copyc nlt$bm_message_id
*copyc ost$global_task_id
