mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-03 21:30:29 +02:00
Code Activity

Define `O_NOTRANS' on GNU/Hurd.

Browse source 
* libguile/filesys.c (scm_init_filesys): Define `O_NOTRANS' when
  available.
This commit is contained in:
Ludovic Courtès 2011-07-12 23:08:42 +02:00
parent 1fe9920adc
commit 3565df4546
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/filesys.c
View file

@ -1857,6 +1857,9 @@ scm_init_filesys ()
#ifdef O_LARGEFILE #ifdef O_LARGEFILE
scm_c_define ("O_LARGEFILE", scm_from_int (O_LARGEFILE)); scm_c_define ("O_LARGEFILE", scm_from_int (O_LARGEFILE));
#endif #endif
#ifdef O_NOTRANS
scm_c_define ("O_NOTRANS", scm_from_int (O_NOTRANS));
#endif
#ifdef F_DUPFD #ifdef F_DUPFD
scm_c_define ("F_DUPFD", scm_from_int (F_DUPFD)); scm_c_define ("F_DUPFD", scm_from_int (F_DUPFD));