
  PROCEDURE [XREF] dmp$create_disk_file_descriptor
    (    file_kind: gft$file_kind;
         file_locator: dmt$file_location;
         p_file_attributes: ^array [1 .. * ] of dmt$file_attribute;
     VAR dfd_pointer: ost$relative_pointer);

?? PUSH (LISTEXT := ON) ??
*copyc dmt$file_attributes
*copyc dmt$file_location
*copyc gft$file_kind
*copyc osd$virtual_address
?? POP ??
