
{ COMMON DECK CMXCDFT }

  PROCEDURE [XREF] cmp$change_dft_entry (device_file_type:
    cmt$device_file_type;
        device_file_count: 1 .. cmc$device_file_count;
        device_file_record: cmt$device_file_record);

?? PUSH (LISTEXT := ON) ??
*copyc CMT$DEVICE_FILE_TABLE
?? POP ??
