
  PROCEDURE [XREF] nlp$bm_deliver_message
    (VAR data_area { input, output } : nat$data_fragments;
     VAR message_id { input, output } : nlt$bm_message_id;
     VAR data_length: integer;
     VAR buffers_released: nat$data_length);

?? PUSH (LISTEXT := ON) ??
*copyc nat$data_fragments
*copyc nlt$bm_message_id
?? POP ??
