diff options
author | Yves Orton <demerphq@gmail.com> | 2023-03-22 20:17:49 +0100 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2023-03-29 20:54:49 +0800 |
commit | fabf023f2ebd7d2d18332760db955889cb7a9d22 (patch) | |
tree | 4ca425160490ab18a609221a1d975c10a0cb0357 /perlio.c | |
parent | 5de3c4299aeef2737ce02b6b2e401a997da32cff (diff) | |
download | perl-fabf023f2ebd7d2d18332760db955889cb7a9d22.tar.gz |
perlio.c - double cast PerlIO_lockcnt()
This avoids various warnings about alignment on HPUX.
Diffstat (limited to 'perlio.c')
-rw-r--r-- | perlio.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -53,7 +53,7 @@ # include <rms.h> #endif -#define PerlIO_lockcnt(f) (((PerlIOl*)(f))->head->flags) +#define PerlIO_lockcnt(f) (((PerlIOl*)(void*)(f))->head->flags) /* Call the callback or PerlIOBase, and return failure. */ #define Perl_PerlIO_or_Base(f, callback, base, failure, args) \ |