In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/0172e63ff9dbdedac30a79ff56b7e0299d8d8b71?hp=8f6e7200d0a5f084322eaef83fc8def57c54c37a>

- Log -----------------------------------------------------------------
commit 0172e63ff9dbdedac30a79ff56b7e0299d8d8b71
Author: Craig A. Berry <[email protected]>
Date:   Fri Feb 19 15:33:10 2016 -0600

    Cast PL_dump_re_max_len to avoid type mismatch warning.
    
    Specifically this one on VMS:
    
        || ! grok_atoUV(dump_len_string, &PL_dump_re_max_len, NULL))
    .....................................^
    %CC-W-PTRMISMATCH, In this statement, the referenced type of the
    pointer value "&(my_perl->Idump_re_max_len)" is "unsigned int",
    which is not compatible with "unsigned long".
    
    This was new code in 2bfbbbaf9ef1783ba.
-----------------------------------------------------------------------

Summary of changes:
 regcomp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/regcomp.c b/regcomp.c
index 820bd92..e337183 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -6720,7 +6720,7 @@ Perl_re_op_compile(pTHX_ SV ** const patternp, int 
pat_count,
 #ifdef DEBUGGING
         dump_len_string = PerlEnv_getenv("PERL_DUMP_RE_MAX_LEN");
         if (   ! dump_len_string
-            || ! grok_atoUV(dump_len_string, &PL_dump_re_max_len, NULL))
+            || ! grok_atoUV(dump_len_string, (UV *)&PL_dump_re_max_len, NULL))
         {
             PL_dump_re_max_len = 0;
         }

--
Perl5 Master Repository

Reply via email to