diff options
| author | Robin Barker <RMBarker@cpan.org> | 1999-09-13 15:15:11 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-13 13:23:04 +0000 |
| commit | 564319723c2c18fa4801cd77e0d203a582b4d5a3 (patch) | |
| tree | 94b6775a09b4e1758847fd3b22587eeae744317b /ext/DynaLoader | |
| parent | 23614c1f233bf6c8f35366cee6be53ae80af0e28 (diff) | |
| download | perl-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 'ext/DynaLoader')
| -rw-r--r-- | ext/DynaLoader/dl_dlopen.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/DynaLoader/dl_dlopen.xs b/ext/DynaLoader/dl_dlopen.xs index a4dcfb4fbe..641db33514 100644 --- a/ext/DynaLoader/dl_dlopen.xs +++ b/ext/DynaLoader/dl_dlopen.xs @@ -166,7 +166,7 @@ dl_load_file(filename, flags=0) if (RETVAL == NULL) SaveError(aTHX_ "%s",dlerror()) ; else - sv_setiv( ST(0), (IV)PTR_CAST RETVAL); + sv_setiv( ST(0), PTR2IV(RETVAL)); void * @@ -187,7 +187,7 @@ dl_find_symbol(libhandle, symbolname) if (RETVAL == NULL) SaveError(aTHX_ "%s",dlerror()) ; else - sv_setiv( ST(0), (IV)PTR_CAST RETVAL); + sv_setiv( ST(0), PTR2IV(RETVAL)); void |