
  PROCEDURE [XREF] lgp$get_log_entry
    (    log_cycle: lgt$log_cycle;
         log_control_descriptor_p: ^lgt$log_control_descriptor;
     VAR log_data: ^SEQ ( * );
     VAR log_entry_size: lgt$log_entry_size;
     VAR log_entry: lgt$log_entry;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc lge$end_of_log
*copyc lge$log_cycles_do_not_match
*copyc lgt$log_control_descriptor
*copyc lgt$log_cycle
*copyc lgt$log_entry
*copyc lgt$log_entry_size
*copyc ost$status
?? POP ??
