In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/026442172f79e2ebdf1b28bda4ff5f753e1702b2?hp=94fa954eaae532928977ae7f7290536783269b6e>
- Log -----------------------------------------------------------------
commit 026442172f79e2ebdf1b28bda4ff5f753e1702b2
Author: David Mitchell <da...@iabyn.com>
Date: Wed Apr 21 14:53:39 2010 +0100
remove bool* cast from SAVEBOOL
SAVEBOOL() should only be used on variables of type bool; casting
pointers to variables of other types into bool* is just wrong.
-----------------------------------------------------------------------
Summary of changes:
scope.h | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/scope.h b/scope.h
index 64e7e27..808108e 100644
--- a/scope.h
+++ b/scope.h
@@ -162,7 +162,7 @@ scope has the given name. Name must be a literal string.
#define SAVEINT(i) save_int((int*)&(i))
#define SAVEIV(i) save_iv((IV*)&(i))
#define SAVELONG(l) save_long((long*)&(l))
-#define SAVEBOOL(b) save_bool((bool*)&(b))
+#define SAVEBOOL(b) save_bool(&(b))
#define SAVESPTR(s) save_sptr((SV**)&(s))
#define SAVEPPTR(s) save_pptr((char**)&(s))
#define SAVEVPTR(s) save_vptr((void*)&(s))
--
Perl5 Master Repository
