pfm_reset_cleanup()

PFM_$RESET_CLEANUP                Domain/OS                 PFM_$RESET_CLEANUP


NAME
     pfm_$reset_cleanup - reset a clean-up handler

SYNOPSIS (C)
     #include <apollo/base.h>
     #include <apollo/pfm.h>

     void pfm_$reset_cleanup(
          pfm_$cleanup_rec &cleanup_record,
          status_$t *status)

SYNOPSIS (Pascal)
     %include '/sys/ins/base.ins.pas';
     %include '/sys/ins/pfm.ins.pas';

     procedure pfm_$reset_cleanup(
          in cleanup_record: pfm_$cleanup_rec;
          out status: status_$t);

SYNOPSIS (FORTRAN)
     %include '/sys/ins/base.ins.ftn'
     %include '/sys/ins/pfm.ins.ftn'

           integer*4 cleanup_record(16), status

           call pfm_$reset_cleanup(cleanup_record, status)

DESCRIPTION
     Pfm_$reset_cleanup re-establishes the clean-up handler last entered so
     that any subsequent errors enter it first.  This procedure should only be
     used within clean-up handler code.

     cleanup_record
          A record of the context at the clean-up handler entry point.  It is
          supplied by pfm_$cleanup, when the clean-up handler if first esta-
          blished.

     status
          The completion status.
Museum
