head	1.2;
access;
symbols
	pkgsrc-2013Q2:1.2.0.44
	pkgsrc-2013Q2-base:1.2
	pkgsrc-2012Q4:1.2.0.42
	pkgsrc-2012Q4-base:1.2
	pkgsrc-2011Q4:1.2.0.40
	pkgsrc-2011Q4-base:1.2
	pkgsrc-2011Q2:1.2.0.38
	pkgsrc-2011Q2-base:1.2
	pkgsrc-2009Q4:1.2.0.36
	pkgsrc-2009Q4-base:1.2
	pkgsrc-2008Q4:1.2.0.34
	pkgsrc-2008Q4-base:1.2
	pkgsrc-2008Q3:1.2.0.32
	pkgsrc-2008Q3-base:1.2
	cube-native-xorg:1.2.0.30
	cube-native-xorg-base:1.2
	pkgsrc-2008Q2:1.2.0.28
	pkgsrc-2008Q2-base:1.2
	pkgsrc-2008Q1:1.2.0.26
	pkgsrc-2008Q1-base:1.2
	pkgsrc-2007Q4:1.2.0.24
	pkgsrc-2007Q4-base:1.2
	pkgsrc-2007Q3:1.2.0.22
	pkgsrc-2007Q3-base:1.2
	pkgsrc-2007Q2:1.2.0.20
	pkgsrc-2007Q2-base:1.2
	pkgsrc-2007Q1:1.2.0.18
	pkgsrc-2007Q1-base:1.2
	pkgsrc-2006Q4:1.2.0.16
	pkgsrc-2006Q4-base:1.2
	pkgsrc-2006Q3:1.2.0.14
	pkgsrc-2006Q3-base:1.2
	pkgsrc-2006Q2:1.2.0.12
	pkgsrc-2006Q2-base:1.2
	pkgsrc-2006Q1:1.2.0.10
	pkgsrc-2006Q1-base:1.2
	pkgsrc-2005Q4:1.2.0.8
	pkgsrc-2005Q4-base:1.2
	pkgsrc-2005Q3:1.2.0.6
	pkgsrc-2005Q3-base:1.2
	pkgsrc-2005Q2:1.2.0.4
	pkgsrc-2005Q2-base:1.2
	pkgsrc-2005Q1:1.2.0.2
	pkgsrc-2005Q1-base:1.2
	pkgsrc-base:1.1.1.1
	TNF:1.1.1;
locks; strict;
comment	@# @;


1.2
date	2005.02.26.22.30.35;	author is;	state dead;
branches;
next	1.1;

1.1
date	2005.02.25.15.54.59;	author is;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2005.02.25.15.54.59;	author is;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Update to SR-2.3.3.
@
text
@$NetBSD: patch-ah,v 1.1 2005/02/25 15:54:59 is Exp $

--- rts/io.c.orig	1999-07-29 00:16:12.000000000 +0200
+++ rts/io.c
@@@@ -7,7 +7,7 @@@@
  */
 
 #include <ctype.h>
-#include <varargs.h>
+#include <stdarg.h>
 #include "rts.h"
 
 #define NOTHING			/* for use as null macro arg under ANSI C */
@@@@ -218,11 +218,9 @@@@ String *fname;
  */
 /*VARARGS*/
 int
-sr_read (va_alist)
-va_dcl
+sr_read (char *locn, ...)
 {
     va_list ap;
-    char *locn;
     File fp;
     char *argt;
     Array *a;
@@@@ -238,8 +236,7 @@@@ va_dcl
     double d;
 
     sr_check_stk (CUR_STACK);
-    va_start (ap);
-    locn = va_arg (ap, char *);
+    va_start (ap, locn);
 
     fp = va_arg (ap, File);
     BEGIN_IO (fp);
@@@@ -442,8 +439,7 @@@@ int n;
  */
 /*VARARGS*/
 void
-sr_printf (va_alist)
-va_dcl
+sr_printf (char *locn, ...)
 {
     va_list ap;
     File fp;
@@@@ -451,14 +447,12 @@@@ va_dcl
     double v;
     char xbuf[20], fbuf[512], dbuf[512], obuf[512];
     int n;
-    char *locn;
     String *str, *sp;
     int ssize;
     Array *arr;
 
     sr_check_stk (CUR_STACK);
-    va_start (ap);
-    locn = va_arg (ap, char *);
+    va_start (ap, locn);
     fp = va_arg (ap, File);
     sp = va_arg (ap, String *);
 
@


1.1
log
@Initial revision
@
text
@d1 1
a1 1
$NetBSD$
@


1.1.1.1
log
@This is the SR, a language for concurrent programming from the
University of Arizona, version 2.3.2.

SR is described in "The SR Programming Language: Concurrency in Practice"
by Gregory R. Andrews and Ronald A. Olsson (Benjamin/Cummings, 1993, ISBN
0-8053-0088-0).
@
text
@@