
  PROCEDURE [XREF] mmp$remove_stale_pages
    (VAR pqle: mmt$page_queue_list_entry;
         aic_modified: integer;
         aic_unmodified: integer;
         jcb_p: ^jmt$job_control_block;
         ijle_p: ^jmt$initiated_job_list_entry;
         queue_id: mmt$page_frame_queue_id;
         minimum_working_set: mmt$page_frame_index;
     VAR modified_pages_removed: integer;
     VAR total_pages_removed: integer;
     VAR total_pages_scanned: integer);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$job_control_block
*copyc mmt$page_queue_list
*copyc mmt$page_frame_queue_id
?? POP ??
