
  PROCEDURE [XREF] lop$search_entry_pt_dictionary (external_name: {input}
    ^pmt$program_name;
        entry_point_dictionary: {input} ^llt$entry_point_dictionary;
    VAR entry_point_found: {control} boolean;
    VAR entry_point_gated: {control} boolean;
    VAR dictionary_index: 1 .. llc$max_entry_points_in_library);

*copyc PMT$PROGRAM_NAME
*copyc LLT$ENTRY_POINT_DICTIONARY
