1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 01:00:20 +02:00

* coop-defs.h (struct coop_t): Renamed errno --> _errno to prevent

errno macro expansion of this field name.  (errno is a C
preprocessor macro on some systems.)
This commit is contained in:
Mikael Djurfeldt 1997-11-30 10:36:13 +00:00
parent 756fa4f89b
commit c44bfbc946
3 changed files with 9 additions and 3 deletions

View file

@ -367,7 +367,7 @@ error_revive (void)
while ((t = coop_qget (&coop_global_sleepq)) != NULL)
{
t->errno = errno;
t->_errno = errno;
t->retval = -1;
coop_qput (&coop_global_runq, t);
}
@ -581,7 +581,7 @@ scm_internal_select (int nfds,
}
if (curr->retval == -1)
errno = curr->errno;
errno = curr->_errno;
return curr->retval;
}