DataMuseum.dk

top - download

    Length: 1533 (0x5fd)
    Types: TextFile
    Names: »compatible.c«

└─⟦8ee07855d⟧ Bits:30000545 8mm tape, Rational 1000, DTIA 2_1_6
    └─ ⟦0c25cb74a⟧ »DATA« 
        └─⟦038380b96⟧ 
└─⟦d0624311f⟧ Bits:30000529 8mm tape, Rational 1000, DTIA 2_1_7
    └─ ⟦f494b5154⟧ »DATA« 
        └─⟦038380b96⟧ 
            └─ ⟦this⟧ »compatible.c« 

TextFile

#ifndef	lint
#ifndef	DEBUG
static char SCCS_id[] = "@(#)compatible.c 2.1 90/08/02 19:03:53  Copyright(c) 1990 by Rational.";
#else
static char SCCS_id[] = "@(#)compatible.c DEBUG 2.1 90/08/02 19:03:53  Copyright(c) 1990 by Rational.";
#endif
#endif

#define		COMPATIBLE
#include	"talk.h"
#undef		COMPATIBLE

#ifdef	HP
bzero(b, length)
char	*b;
int	length; 
{
	while (length--)	*b++ = '\0';
}

bcopy(b1, b2 ,length)
char	*b1,*b2;
int	length; 
{
	while (length--)	*b2++ = *b1++;
}

char	*index(s, c)
char	*s, c; 
{
	return	strchr(s, c);
}

char	*rindex(s, c)
char	*s, c; 
{
	return	strrchr(s, c);
}

int	getdtablesize() {
	return	FD_SETSIZE;
}

char	*getwd(path)
char	*path; 
{
	return	getcwd(path,MAXPATHLEN);
}

int	wait_pid(pid)
int	pid; 
{
	int	pid_ret;
	do {
		pid_ret=waitpid(pid,(int *)NULL,WNOHANG);
	} while (pid_ret > 0);
	return	pid_ret;
}

#endif

/* Not sure if can use #ifdef exp1 || exp2 for different compilers */
#ifdef ULTRIX_DTIA
#define SUN
#endif

#ifdef	SUN
int	wait_pid(pid)
int	pid; 
{
	int	pid_ret;
	do {
		pid_ret = 
		    wait3((union wait *)NULL,WNOHANG,(struct rusage *)NULL);
	} while (pid_ret > 0);
	return	pid_ret;
}
#endif

#ifdef ULTRIX_DTIA
#undef SUN
#endif

#ifdef	AIX
int	wait_pid(pid)
int	pid; 
{
	int	pid_ret;
	do {
		pid_ret = waitpid(pid,(int *)NULL,WNOHANG);
	} while (pid_ret > 0);
	return	pid_ret;
}
#endif

#ifdef	APOLLO
int	wait_pid(pid)
int	pid; 
{
	int	pid_ret;
	do {
		pid_ret=wait3((union wait *)NULL,WNOHANG,(struct rusage *)NULL);
	} while (pid_ret > 0);
	return	pid_ret;
}
#endif