Function:     atfinis

Purpose:      Register procedure to be called by FINIS.

Category:     SYSTEM

File:         srvreq.c

Author:       J.P. Terlouw

Use:          result = atfinis( proc, data);
                      result : result code; type int.
                               = 1 - procedure successfully registered;
                               = 0 - insufficient callback entries.
                      proc    : procedure to be called; type void(*)(void*).
                      data    : data to be passed to proc; type void*.

              If atfinis is called more than once, FINIS will call the most 
              recently registered procedures first.

Limitations:  This procedure is only available from C. The maximum number of
              callback entries is determined by the constant N_ATFINIS
              defined in taskcom.h.

Updates:      Nov  7, 1990: JPT, Document created.