
  PROCEDURE [XREF] clp$evaluate_type_conformance
    (    candidate_type_description: ^clt$type_description;
         base_type_description: ^clt$type_description;
         minimum_type_conformance: clt$type_conformance;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$type_conformance
*copyc clt$type_description
*copyc ost$status
?? POP ??
