adios Sample Subroutine

This section explains adios sample subroutine.

/* Function: adios
*
* Inputs: 
* what - the thing that went wrong
* fmt - the string to be printed in printf format (char*)
* variables - variable needed to fill in the fmt.
*
* Outputs: none
* Returns: none
*
* NOTE: The adios function calls the logging function with the  
* variables above and a LLOG_FATAL error code. The function then
* exits with a return code of 1, thereby terminating the sampled
* process.
*/
#ifndef lint
void    adios (va_list)
va_dcl
{
   va_list ap;
   va_start (ap);
   _ll_log (pgm_log, LLOG_FATAL, ap); /*Prints to the log*/
                                  /*specified by pgm_log.a*/
                                  /* Fatal error         */
   va_end (ap);
   _exit (1);
}
#else
/*  VARAGS  */
void adios (what,fmt)
char *what,
     *fmt;
{
   adios (what, fmt);
}
#endif