PROC dum$DISPLAY_P_F_T_ENTRY display_p_f_t_entry, dispfte (
  pfti      : integer -281474976710655..281474976710655 = $required
  output, o : file = $output
  )

  crev pftep
  compute_entry_address $sa(mmv$pft_p) $value(pfti) pftep
  oo = $string($value(output)) // '.$eoi'
  putl ' ----- Page Frame Table Entry '//$strrep($value(pfti), 16) o=$fname(oo)
  mmt$page_frame_table_entry pftep o=$value(output)

PROCEND dum$display_p_f_t_entry
