diff options
| author | Nicholas Clark <nick@ccl4.org> | 2012-08-08 12:37:48 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2012-09-04 11:08:35 +0200 |
| commit | a5bd31f4dc3fec64e60f1412a4eeac30d6f6b96b (patch) | |
| tree | 40ff456a5b99ba383eae18d4a4d2009f12a9391b /pp.c | |
| parent | 2d1c5561244ffb488f4901ad84c08f3fc6443be9 (diff) | |
| download | perl-a5bd31f4dc3fec64e60f1412a4eeac30d6f6b96b.tar.gz | |
Under -DPERL_DEBUG_READONLY_OPS don't work around glibc 2.2.5 _moddi3 bugs.
The work around involves a runtime check and substituting OP pointers based
on the result. The substitution fails if the optree is mapped read-only.
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -2364,7 +2364,7 @@ PP(pp_i_divide) } } -#if defined(__GLIBC__) && IVSIZE == 8 +#if defined(__GLIBC__) && IVSIZE == 8 && !defined(PERL_DEBUG_READONLY_OPS) STATIC PP(pp_i_modulo_0) #else @@ -2387,7 +2387,7 @@ PP(pp_i_modulo) } } -#if defined(__GLIBC__) && IVSIZE == 8 +#if defined(__GLIBC__) && IVSIZE == 8 && !defined(PERL_DEBUG_READONLY_OPS) STATIC PP(pp_i_modulo_1) |