
  TYPE
    jmt$name_list = ARRAY [ 1 .. *] OF jmt$name;

*copyc jmt$name
