In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/01f449739adb09a21772a83e939e5c96152d636c?hp=ed57bf8d26295a956cc0a2b7959fd1088d7f8b2f>

- Log -----------------------------------------------------------------
commit 01f449739adb09a21772a83e939e5c96152d636c
Author: David Mitchell <[email protected]>
Date:   Mon Dec 10 16:28:19 2012 +0000

    fix warning in PmopSTASH_set()
    
    In the threaded version of PmopSTASH_set(), the assigned value is a
    PADOFFSET, not a pointer; so use 0 rather than NULL for the default value.
    
    This keeps clang happy.
-----------------------------------------------------------------------

Summary of changes:
 op.h |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/op.h b/op.h
index c1800df..286b880 100644
--- a/op.h
+++ b/op.h
@@ -457,7 +457,7 @@ struct pmop {
 #  define PmopSTASH_set(o,hv)  \
        (assert_((o)->op_pmflags & PMf_ONCE)                            \
         (o)->op_pmstashstartu.op_pmstashoff =                          \
-           (hv) ? alloccopstash(hv) : NULL)
+           (hv) ? alloccopstash(hv) : 0)
 #else
 #  define PmopSTASH(o)                                                 \
     (((o)->op_pmflags & PMf_ONCE) ? (o)->op_pmstashstartu.op_pmstash : NULL)

--
Perl5 Master Repository

Reply via email to