
  PROCEDURE [INLINE] mmp$purge_all_cache_map;

    VAR
      null_sva: 0 .. 0ffffffffffff(16);

    IF mmv$multiple_caches OR mmv$multiple_page_maps THEN
      mmp$purge_all_cache_map_proc;
    ELSE
      null_sva := 0;
      #purge_buffer (osc$purge_all_cache, null_sva);
      #purge_buffer (osc$purge_all_page_seg_map, null_sva);
    IFEND;

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