
  TYPE
    clt$utility_prompt = record
      size: clt$prompt_size,
      value: string (clc$max_prompt_size),
    recend;

*copyc clc$max_prompt_size
*copyc clt$prompt_size
