*copyc dfv$ch_queue_entry_location

    PROCEDURE [INLINE] dfp$end_ch_remote_proc_call
      (    queue_entry_location: dft$rpc_queue_entry_location;
       VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
      status.normal := TRUE;
      dfp$end_remote_procedure_call (queue_entry_location, status);
      dfv$ch_queue_entry_location := 1;
      #SPOIL (dfv$ch_queue_entry_location);
      osp$disestablish_cond_handler;

    PROCEND dfp$end_ch_remote_proc_call;

*copyc dfp$end_remote_procedure_call
*copyc dft$rpc_queue_entry_location
*copyc osp$disestablish_cond_handler
*copyc ost$status
?? POP ??
