change over to new error message format

[unix-history] / usr / src / usr.bin / pascal / libpc / ADDT.c

/* Copyright (c) 1979 Regents of the University of California */

static char sccsid[] = "@(#)ADDT.c 1.2 %G%";

long *
ADDT(result0, left, right, siz)

	long		*result0;
	register long	*left;
	register long	*right;
	long		siz;
{
	register long	*result = result0;
	register int	size = siz;

	do {
		*result++ = *left++ | *right++;
	} while (--size);
	return result0;
}