summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorScott Henry <scotth@sgi.com>1998-09-29 10:38:46 -0700
committerGurusamy Sarathy <gsar@cpan.org>1998-10-02 04:10:47 +0000
commit97cc44eb3354a060109750a447392fc7db9722c4 (patch)
treed3dfbb7a94824b097376e66d5469d9d49ab474c1 /pp_sys.c
parente44f695ee9be4f523999589b52c7c8e9ddc1bed9 (diff)
downloadperl-97cc44eb3354a060109750a447392fc7db9722c4.tar.gz
use Off_t to permit 64-bit seek()
Date: 29 Sep 1998 17:38:46 -0700 Message-ID: <yd8lnn2zb6x.fsf_-_@hoshi.engr.sgi.com> Subject: Re: [PATCH] 5.005_02: Configure "Massive Attack" -- Date: 28 Sep 1998 18:55:37 -0700 Message-ID: <yd8ogrz1y3q.fsf@hoshi.engr.sgi.com> Subject: Re: [PATCH] 5.005_51: Configure "Massive Attack" p4raw-id: //depot/perl@1915
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 2eb8a1633e..7fa4de232d 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1599,13 +1599,13 @@ PP(pp_sysseek)
djSP;
GV *gv;
int whence = POPi;
- long offset = POPl;
+ Off_t offset = POPl;
gv = PL_last_in_gv = (GV*)POPs;
if (PL_op->op_type == OP_SEEK)
PUSHs(boolSV(do_seek(gv, offset, whence)));
else {
- long n = do_sysseek(gv, offset, whence);
+ Off_t n = do_sysseek(gv, offset, whence);
PUSHs((n < 0) ? &PL_sv_undef
: sv_2mortal(n ? newSViv((IV)n)
: newSVpv(zero_but_true, ZBTLEN)));