1*30486Slepreau static char Sccsid[] "@(#)xunlink	2.1";
2*30486Slepreau /*
3*30486Slepreau 	Interface to unlink(II) which handles all error conditions.
4*30486Slepreau 	Returns 0 on success,
5*30486Slepreau 	fatal() on failure.
6*30486Slepreau */
7*30486Slepreau 
8*30486Slepreau xunlink(f)
9*30486Slepreau {
10*30486Slepreau 	if (unlink(f))
11*30486Slepreau 		return(xmsg(f,"xunlink"));
12*30486Slepreau 	return(0);
13*30486Slepreau }
14