blob: 71ea5f8df9ef7d43e9647561de17447189bd03e0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
$NetBSD: patch-au,v 1.3 2005/12/14 13:53:24 joerg Exp $
--- tcl/panic.c.orig 1995-02-24 21:19:49.000000000 +0000
+++ tcl/panic.c
@@ -19,7 +19,7 @@ static char rcsid[] = "$Header: /home/ag
#include <stdio.h>
#include <stdlib.h>
-#include <varargs.h>
+#include <stdarg.h>
/*
*----------------------------------------------------------------------
@@ -39,18 +39,17 @@ static char rcsid[] = "$Header: /home/ag
#ifndef lint
void
-panic(va_alist)
- va_dcl /* char *format, then any number of additional
+panic(char *format, ...)
+ /* char *format, then any number of additional
* values to be printed under the control of
* format. This is all just the same as you'd
* pass to printf. */
{
- char *format;
va_list args;
- va_start(args);
- format = va_arg(args, char *);
+ va_start(args, format);
(void) vfprintf(stderr, format, args);
+ va_end(args);
(void) fflush(stderr);
abort();
}
|
