
  PROCEDURE [XREF] jmp$get_object_list
    (    name: string ( * );
         kind: jmt$profile_object_kinds;
     VAR list: jmt$profile_object_list;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jme$profile_object_errors
*copyc jmt$profile_object_list
*copyc ost$status
?? POP ??
