
  PROCEDURE [XREF] dbp$define_entry_point_address (entry_point_table_item:
    dbt$entry_point_table_item;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc DBT$ENTRY_POINT_TABLE
*copyc OST$STATUS
?? POP ??
