  PROCEDURE [INLINE] mmp$pva_purge_one_page_map (pva: ^cell);

    IF mmv$multiple_page_maps THEN
      mmp$purge_all_map_proc;
    ELSE
      #purge_buffer (osc$pva_purge_one_page_map, pva);
    IFEND;

  PROCEND;
?? PUSH (LISTEXT := ON) ??
*copyc MMP$PURGE_ALL_MAP_PROC
*copyc OSC$PURGE_MAP_AND_CACHE
?? POP ??
