char id_unlink[] = "@(#)unlink_.c 1.1";
* ierror = unlink(filename)
* ierror will be a returned status (0 == OK)
* filename is the file to be unlinked
#include "../libI77/f_errno.h"
if (namlen
>= sizeof buf
)
return((long)(errno
=F_ERARG
));
g_char(fname
, namlen
, buf
);