extern int errno;
serrno_(n)
long *n;
{	errno = *n; }
