

  TYPE
    ift$function_key_class_size = 1 .. ifc$max_function_key_class_size;

  TYPE
    ift$function_key_class = record
      size: ift$function_key_class_size,
      value: string (ifc$max_function_key_class_size),
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc ifc$terminal_constants
?? POP ??
