
  TYPE
    ift$fetch_context_attribute = record
      case key: ift$fetch_context_keys of
      = ifc$previous_mode =
        previous_mode: ift$terminal_mode,
      = ifc$previous_file_id =
        previous_file_id: amt$file_identifier,
      = ifc$previous_operation =
        previous_operation: amt$fap_operation,
      casend,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc ift$fetch_context_keys
*copyc ift$terminal_mode
*copyc amt$file_identifier
*copyc amt$fap_operation
?? POP ??
