diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-01-07 13:53:57 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-01-07 13:53:57 +0000 |
commit | b7e0bd9e800e06ac92e4d24efd91bf8739281a2f (patch) | |
tree | 48ad6e5e20111fbdc4cbc301434b30fec30d8803 /regexp.h | |
parent | 5e895007ab03f09eac671ddef26faa6c584ba8b7 (diff) | |
download | perl-b7e0bd9e800e06ac92e4d24efd91bf8739281a2f.tar.gz |
ReREFCNT_inc() should return a pointer to REGEXP.
[I don't get warnings about void context here, but I'm sure someone
will :-(]
p4raw-id: //depot/perl@32890
Diffstat (limited to 'regexp.h')
-rw-r--r-- | regexp.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -437,7 +437,7 @@ and check for NULL. ({ \ /* This is here to generate a casting warning if incorrect. */ \ REGEXP *const zwapp = (re); \ - SvREFCNT_inc(zwapp); \ + (REGEXP *) SvREFCNT_inc(zwapp); \ }) # define ReREFCNT_dec(re) \ ({ \ @@ -447,7 +447,7 @@ and check for NULL. }) #else # define ReREFCNT_dec(re) SvREFCNT_dec(re) -# define ReREFCNT_inc(re) SvREFCNT_inc(re) +# define ReREFCNT_inc(re) ((REGEXP *) SvREFCNT_inc(re)) #endif /* FIXME for plugins. */ |