use varargs when needed

modules/src/print/doprnt.c

@@ -5,14 +5,15 @@
 /* $Header$ */
 
 #include <system.h>
+#include <varargs.h>
 #include "param.h"
 
 doprnt(fp, fmt, argp)
 	File *fp;
 	char *fmt;
-	int argp[];
+	va_list argp;
 {
 	char buf[SSIZE];
 
-	sys_write(fp, buf, _format(buf, fmt, (char *)argp));
+	sys_write(fp, buf, _format(buf, fmt, argp));
 }

modules/src/print/format.c

@@ -4,6 +4,8 @@
  */
 /* $Header$ */
 
+#include <varargs.h>
+
 char *long2str();
 
 static int
@@ -27,9 +29,9 @@ integral(c)
 int
 _format(buf, fmt, argp)
 	char *buf, *fmt;
-	char *argp;
+	register va_list argp;
 {
-	register char *pf = fmt, *pa = argp;
+	register char *pf = fmt;
 	register char *pb = buf;
 
 	while (*pf) {
@@ -52,24 +54,20 @@ _format(buf, fmt, argp)
 			while (*pf >= '0' && *pf <= '9')
 				width = 10 * width + *pf++ - '0';
 			
-			/* get text and move pa */
 			if (*pf == 's') {
-				arg = *(char **)pa;
+				arg = va_arg(argp, char *);
-				pa += sizeof(char *);
 			}
 			else
 			if (*pf == 'c') {
-				cbuf[0] = * (int *) pa;
+				cbuf[0] = va_arg(argp, int);
 				cbuf[1] = '\0';
-				pa += sizeof(int);
 				arg = &cbuf[0];
 			}
 			else
 			if (*pf == 'l') {
 				/* alignment ??? */
 				if (base = integral(*++pf)) {
-					arg = long2str(*(long *)pa, base);
+					arg = long2str(va_arg(argp,long), base);
-					pa += sizeof(long);
 				}
 				else {
 					pf--;
@@ -78,8 +76,7 @@ _format(buf, fmt, argp)
 			}
 			else
 			if (base = integral(*pf)) {
-				arg = long2str((long)*(int *)pa, base);
+				arg = long2str((long)va_arg(argp,int), base);
-				pa += sizeof(int);
 			}
 			else
 			if (*pf == '%')

modules/src/print/fprint.c

@@ -4,16 +4,23 @@
  */
 /* $Header$ */
 
+#include <varargs.h>
 #include <system.h>
 #include "param.h"
 
 /*VARARGS1*/
-fprint(fp, fmt, args)
+fprint(va_alist)
+	va_dcl
+{
 	File *fp;
 	char *fmt;
-	int args;
+	va_list args;
-{
+
 	char buf[SSIZE];
 
-	sys_write(fp, buf, _format(buf, fmt, &args));
+	va_start(args);
+	fp = va_arg(args, File *);
+	fmt = va_arg(args, char *);
+	sys_write(fp, buf, _format(buf, fmt, args));
+	va_end(args);
 }

modules/src/print/print.3

@@ -5,6 +5,7 @@ print, fprint, sprint, doprnt -- very simple formatted-output routines
 .SH SYNOPSIS
 .nf
 .B #include <system.h>
+.B #include <varargs.h>
 .PP
 .B print(format [, arg] ... )
 .B char *format;
@@ -19,7 +20,7 @@ print, fprint, sprint, doprnt -- very simple formatted-output routines
 .B doprnt(filep, format, args)
 .B File *filep;
 .B char *format;
-.B int args[];
+.B va_list args;
 .fi
 .SH DESCRIPTION
 .I Print

modules/src/print/print.c

@@ -4,15 +4,20 @@
  */
 /* $Header$ */
 
+#include <varargs.h>
 #include <system.h>
 #include "param.h"
 
 /*VARARGS1*/
-print(fmt, args)
+print(va_alist)
-	char *fmt;
+	va_dcl
-	int args;
 {
+	char *fmt;
+	va_list args;
 	char buf[SSIZE];
 
-	sys_write(STDOUT, buf, _format(buf, fmt, &args));
+	va_start(args);
+	fmt = va_arg(args, char *);
+	sys_write(STDOUT, buf, _format(buf, fmt, args));
+	va_end(args);
 }

modules/src/print/sprint.c

@@ -4,15 +4,22 @@
  */
 /* $Header$ */
 
+#include <varargs.h>
 #include <system.h>
 #include "param.h"
 
 /*VARARGS1*/
 char *
-sprint(buf, fmt, args)
+sprint(va_alist)
-	char *buf, *fmt;
+	va_dcl
-	int args;
 {
-	buf[_format(buf, fmt, &args)] = '\0';
+	char *buf, *fmt;
+	va_list args;
+
+	va_start(args);
+	buf = va_arg(args, char *);
+	fmt = va_arg(args, char *);
+	buf[_format(buf, fmt, args)] = '\0';
+	va_end(args);
 	return buf;
 }