From: Mark H Weaver <mhw@netris.org>
Date: Tue, 18 Jun 2019 07:28:18 +0000 (-0400)
Subject: fport_seek: Eliminate a fruitless use of 'off_t_or_off64_t'.
X-Git-Tag: v2.2.5~17
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=a17b727963dd8c443f35be9b64b1625e9fa5eddf;p=platform%2Fupstream%2Fguile.git

fport_seek: Eliminate a fruitless use of 'off_t_or_off64_t'.

This is a followup to commit 91ba73b397fcc2a36ae7e434522a924c7a8887d0.

* libguile/fports.c (fport_seek): Use 'lseek' instead of
'lseek_or_lseek64', and use 'scm_t_off' uniformly.  That's the type used
in the function signature, and there's no benefit to using a wider type
internally.  Remove the overflow check, which is no longer needed.
---

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;
 }