 TYPE
    fmt$p_info = ^SEQ ( * ),

    fmt$p_lfn = ^amt$local_file_name,

    fmt$p_lfn_list = ^array [1 .. * ] of amt$local_file_name,

    fmt$p_number_of_lfns = ^fmt$number_of_lfns,

    fmt$number_of_lfns = 0 .. 10000000;

?? PUSH (LISTEXT := ON) ??
*copyc amt$local_file_name
?? POP ??
