MODULE iim$nam_passoff;
*copyc OSD$DEFAULT_PRAGMATS
?? TITLE := '  NOS/VE: IIM$NAM_PASSOFF ' ??
{
{  The purpose of this module is to sign_off the nam_passon from the
{    memory link.
{
?? PUSH (LISTEXT := ON) ??
*copyc ifd$machine_definition
*copyc iit$application_names_messages
*copyc MLP$SIGN_OFF

  PROCEDURE [XREF] initmli (i: integer);
?? POP ??

  VAR
    status: ost$status;

  PROGRAM nam_passoff;

    initmli (0);
    mlp$sign_off (iic$passon_application_name, status);
  PROCEND nam_passoff;
MODEND
