File /code/strss7/lib/libxnet/t_close.c

#ident "@(#) $RCSfile: t_close.c,v $ $Name:  $($Revision: 0.8.2.2 $) $Date: 2003/05/27 11:21:51 $"

static char const ident[] = "$RCSfile: t_close.c,v $ $Name:  $($Revision: 0.8.2.2 $) $Date: 2003/05/27 11:21:51 $";

#include <unistd.h>
#include <errno.h>
#include "xti.h"
#include <sys/xti.h>

int t_close(int fd)
{
	if (close(fd) == 0)
		return 0;
	switch (errno) {
	case EBADF:
		t_errno = EBADF;
		break;
	default:
		t_errno = TSYSERR;
		break;
	}
	return (-1);
}