|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T e
Length: 910 (0x38e)
Types: TextFile
Names: »err_abrt.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
└─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z«
└─⟦e5a54fb17⟧
└─⟦this⟧ »pp-5.0/Lib/util/err_abrt.c«
/* err_abrt: abort from an error */
# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/util/RCS/err_abrt.c,v 5.0 90/09/20 16:17:10 pp Exp Locker: pp $";
# endif
/*
* $Header: /cs/research/pp/hubris/pp-beta/Lib/util/RCS/err_abrt.c,v 5.0 90/09/20 16:17:10 pp Exp Locker: pp $
*
* $Log: err_abrt.c,v $
* Revision 5.0 90/09/20 16:17:10 pp
* rcsforce : 5.0 public release
*
*/
#include "head.h"
#include <varargs.h>
#ifdef lint
/*VARARGS2 */
void err_abrt(code, fmt)
int code;
char *fmt;
{
err_abrt (code, fmt);
}
#else
void err_abrt (va_alist)
va_dcl
{
va_list ap;
int code;
char tbuf[BUFSIZ];
va_start (ap);
code = va_arg (ap, int);
_asprintf (tbuf, NULLCP, ap);
PP_OPER (NULLCP, ("err_abrt (%s) [%s]", tbuf, rp_valstr(code)));
fprintf(stderr, "err_abrt -> %s [%s]\n", tbuf, rp_valstr(code));
va_end (ap);
exit(code);
}
#endif