

  {Loader Keypoint Procedure Identifiers}

  CONST
    lok$load_program = lok$base + 0,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_load_program' }
    {X 'LO_load_program' 'status ' I20 }
*ELSE
    {E 'lop$load_program' }
    {X 'lop$load_program' 'status ' I20 }
*IFEND

    lok$load_module_from_library = lok$base + 1,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_load_module_from_library' }
    {X 'LO_load_module_from_library' 'status ' I20 }
*ELSE
    {E 'lop$load_module_from_library' }
    {X 'lop$load_module_from_library' 'status ' I20 }
*IFEND

    lok$load_entry_point = lok$base + 2,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_load_entry_point' }
    {X 'LO_load_entry_point' 'status ' I20 }
*ELSE
    {E 'lop$load_entry_point' }
    {X 'lop$load_entry_point' 'status ' I20 }
*IFEND

    lok$add_program_load_libraries = lok$base + 3,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_add_program_load_libraries' }
    {X 'LO_add_program_load_libraries' 'status ' I20 }
*ELSE
    {E 'lop$add_program_load_libraries' }
    {X 'lop$add_program_load_libraries' 'status ' I20 }
*IFEND

    lok$load_module_list = lok$base + 4,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_load_module_list' }
    {X 'LO_load_module_list' 'status ' I20 }
*ELSE
    {E 'lop$load_module_list' }
    {X 'lop$load_module_list' 'status ' I20 }
*IFEND

    lok$satisfy_externals = lok$base + 5,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_satisfy_external_references' }
    {X 'LO_satisfy_external_references' 'status ' I20 }
*ELSE
    {E 'lop$satisfy_externals' }
    {X 'lop$satisfy_externals' 'status ' I20 }
*IFEND

    lok$load_module = lok$base + 6,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_load_module' }
    {X 'LO_load_module' 'status ' I20 }
*ELSE
    {E 'lop$load_module' }
    {X 'lop$load_module' 'status ' I20 }
*IFEND

    lok$open_library = lok$base + 7,
*IF $variable(osc$select_path_keypoints, defined) AND osc$select_path_keypoints
    {E 'LO_open_library' }
    {X 'LO_open_library' 'status ' I20 }
*ELSE
    {E 'lop$open_library' }
    {X 'lop$open_library' 'status ' I20 }
*IFEND

    lok$limit = lok$base + 49;

*copyc amk$base_keypoint_values
