/*
- * "@(#)abort_.c 1.1"
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ *
+ * @(#)abort_.c 5.1 6/7/85
*/
#include <stdio.h>
if (nargs()) while (len-- > 0) fputc(*msg++, stderr);
else fprintf(stderr, "called");
fputc('\n', stderr);
- f_exit();
- _cleanup();
- abort();
+ f77_abort();
}
#endif vax