66 lines
		
	
	
	
		
			1.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			66 lines
		
	
	
	
		
			1.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/****************************************************************
 | 
						|
Copyright 1990 by AT&T Bell Laboratories and Bellcore.
 | 
						|
 | 
						|
Permission to use, copy, modify, and distribute this software
 | 
						|
and its documentation for any purpose and without fee is hereby
 | 
						|
granted, provided that the above copyright notice appear in all
 | 
						|
copies and that both that the copyright notice and this
 | 
						|
permission notice and warranty disclaimer appear in supporting
 | 
						|
documentation, and that the names of AT&T Bell Laboratories or
 | 
						|
Bellcore or any of their entities not be used in advertising or
 | 
						|
publicity pertaining to distribution of the software without
 | 
						|
specific, written prior permission.
 | 
						|
 | 
						|
AT&T and Bellcore disclaim all warranties with regard to this
 | 
						|
software, including all implied warranties of merchantability
 | 
						|
and fitness.  In no event shall AT&T or Bellcore be liable for
 | 
						|
any special, indirect or consequential damages or any damages
 | 
						|
whatsoever resulting from loss of use, data or profits, whether
 | 
						|
in an action of contract, negligence or other tortious action,
 | 
						|
arising out of or in connection with the use or performance of
 | 
						|
this software.
 | 
						|
****************************************************************/
 | 
						|
 | 
						|
/* This is for the benefit of people whose systems don't provide
 | 
						|
 * memset, memcpy, and memcmp.  If yours is such a system, adjust
 | 
						|
 * the makefile by adding memset.o to the "OBJECTS =" assignment.
 | 
						|
 * WARNING: the memcpy below is adequate for f2c, but is not a
 | 
						|
 * general memcpy routine (which must correctly handle overlapping
 | 
						|
 * fields).
 | 
						|
 */
 | 
						|
 | 
						|
 int
 | 
						|
memcmp(s1, s2, n)
 | 
						|
 register char *s1, *s2;
 | 
						|
 int n;
 | 
						|
{
 | 
						|
	register char *se;
 | 
						|
 | 
						|
	for(se = s1 + n; s1 < se; s1++, s2++)
 | 
						|
		if (*s1 != *s2)
 | 
						|
			return *s1 - *s2;
 | 
						|
	return 0;
 | 
						|
	}
 | 
						|
 | 
						|
 char *
 | 
						|
memcpy(s1, s2, n)
 | 
						|
 register char *s1, *s2;
 | 
						|
 int n;
 | 
						|
{
 | 
						|
	register char *s0 = s1, *se = s1 + n;
 | 
						|
 | 
						|
	while(s1 < se)
 | 
						|
		*s1++ = *s2++;
 | 
						|
	return s0;
 | 
						|
	}
 | 
						|
 | 
						|
memset(s, c, n)
 | 
						|
 register char *s;
 | 
						|
 register int c;
 | 
						|
 int n;
 | 
						|
{
 | 
						|
	register char *se = s + n;
 | 
						|
 | 
						|
	while(s < se)
 | 
						|
		*s++ = c;
 | 
						|
	}
 |