home *** CD-ROM | disk | FTP | other *** search
-
- /* disgnostic - output error message */
- diagnostic (fatal, arg1, arg2, arg3, arg4, arg5, arg6)
- /**********************/
- int fatal;
- char *arg1, *arg2, *arg3, *arg4, *arg5, *arg6;
- {
- if (arg1 != NULL)
- {fputs (arg1, std_err);
- if (arg2 != NULL)
- {fputs (arg2, std_err);
- if (arg3 != NULL)
- {fputs (arg3 ,std_err);
- if (arg4 != NULL)
- {fputs (arg4, std_err);
- if (arg5 != NULL)
- {fputs (arg5, std_err);
- if (arg6 != NULL)
- fputs (arg6, std_err);
- } } } } }
- fputs ("\n", std_err);
- if (fatal)
- exit();
- } /* diagnostic */
-