diff options
Diffstat (limited to 'libguile')
| -rw-r--r-- | libguile/fports.c | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/libguile/fports.c b/libguile/fports.c index 5de08d319..5f1bbb9b4 100644 --- a/libguile/fports.c +++ b/libguile/fports.c @@ -613,18 +613,13 @@ static scm_t_off fport_seek (SCM port, scm_t_off offset, int whence) { scm_t_fport *fp = SCM_FSTREAM (port); - off_t_or_off64_t result; + scm_t_off result; - result = lseek_or_lseek64 (fp->fdes, offset, whence); + result = lseek (fp->fdes, offset, whence); if (result == -1) scm_syserror ("fport_seek"); - /* Check to make sure the result fits in scm_t_off, - which might be smaller than off_t_or_off64_t. */ - if (result > SCM_T_OFF_MAX) - scm_num_overflow ("fport_seek"); - return result; } |