
  TYPE
    clt$prompt_string = string ( * <= clc$max_prompt_string_size);

*copyc clc$max_prompt_string_size
