diff options
| author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-11-23 11:29:19 +0000 |
|---|---|---|
| committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2018-10-23 15:05:59 +0100 |
| commit | 36b19dd8d51081b1314949c9e33ac02aac8aa273 (patch) | |
| tree | 47337f865d4efaa51d0740dd11a102ceb54f9f67 /pp_sys.c | |
| parent | dda4a47798d635b6b0d236c270660c8eacdda2fa (diff) | |
| download | perl-36b19dd8d51081b1314949c9e33ac02aac8aa273.tar.gz | |
Cast away const from AIX' accessx() path argument
Unlike every other platform's access() or equivalent (and as required
by POSIX), AIX doesn't declare the path argument to access() and
accessx() as const char*, so cast the const away.
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -213,8 +213,8 @@ void endservent(void); #endif #if !defined(PERL_EFF_ACCESS) && defined(HAS_ACCESSX) && defined(ACC_SELF) - /* AIX */ -# define PERL_EFF_ACCESS(p,f) (accessx((p), (f), ACC_SELF)) + /* AIX's accessx() doesn't declare its argument const, unlike every other platform */ +# define PERL_EFF_ACCESS(p,f) (accessx((char*)(p), (f), ACC_SELF)) #endif |