summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorRobin Barker <RMBarker@cpan.org>1999-09-13 15:15:11 +0100
committerJarkko Hietaniemi <jhi@iki.fi>1999-09-13 13:23:04 +0000
commit564319723c2c18fa4801cd77e0d203a582b4d5a3 (patch)
tree94b6775a09b4e1758847fd3b22587eeae744317b /pp.c
parent23614c1f233bf6c8f35366cee6be53ae80af0e28 (diff)
downloadperl-564319723c2c18fa4801cd77e0d203a582b4d5a3.tar.gz
Replace change #4100 with
To: gsar@activestate.com Cc: perl5-porters@perl.org Subject: Re: [ID 19990907.004] [PATCH perl5.005_61] compiler warnings with -Duse64bits Message-Id: <199909131315.OAA24012@tempest.npl.co.uk> p4raw-link: @4100 on //depot/cfgperl: 427181846486e3aa5034a647dc1922377185f4c0 p4raw-id: //depot/cfgperl@4136
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index 6b71e8c883..07bb33d367 100644
--- a/pp.c
+++ b/pp.c
@@ -1778,9 +1778,9 @@ S_seed(pTHX)
# endif
#endif
u += SEED_C3 * (U32)getpid();
- u += SEED_C4 * (U32)(UV)PTR_CAST PL_stack_sp;
+ u += SEED_C4 * (U32)PTR2UV(PL_stack_sp);
#ifndef PLAN9 /* XXX Plan9 assembler chokes on this; fix needed */
- u += SEED_C5 * (U32)(UV)PTR_CAST &when;
+ u += SEED_C5 * (U32)PTR2UV(&when);
#endif
return u;
}