Return to ADDT.c CVS log

Up to [Research Unix] / researchv10dc / cmd / pascal / libpc

researchv10 Dan Cross

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

static char sccsid[] = "@(#)ADDT.c 1.2 3/7/81";

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;
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.