mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 12:20:26 +02:00
Code Activity

Add back error if the size of off_t is unknown. The bug was actually

Browse source 
in guile-readline's configuration.
This commit is contained in:
Rob Browning 2006-04-19 03:57:03 +00:00
parent da53d2ff90
commit 2ac0f04603
1 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

13
libguile/_scm.h
View file

@ -159,12 +159,13 @@
#define scm_to_off_t_or_off64_t CHOOSE_LARGEFILE(scm_to_off_t,scm_to_int64)
#if SIZEOF_OFF_T == 4
#define scm_to_off_t scm_to_int32
#define scm_from_off_t scm_from_int32
#endif
#if SIZEOF_OFF_T == 8
#define scm_to_off_t scm_to_int64
#define scm_from_off_t scm_from_int64
# define scm_to_off_t scm_to_int32
# define scm_from_off_t scm_from_int32
#elif SIZEOF_OFF_T == 8
# define scm_to_off_t scm_to_int64
# define scm_from_off_t scm_from_int64
#else
# error sizeof(off_t) is not 4 or 8.
#endif