In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/bfba585ac769bf0862ff2ce15499506aaa370ece?hp=8ced8222abf2622ec6f811948d37fbd29984c1fc>
- Log -----------------------------------------------------------------
commit bfba585ac769bf0862ff2ce15499506aaa370ece
Author: Karl Williamson <pub...@khwilliamson.com>
Date: Tue Jan 18 12:27:56 2011 -0700
op_reg_common.h: add explicit cast
A version of the g++ compiler isn't allowing the implicit cast of U32 to an
enum. Change to use an explicit cast.
-----------------------------------------------------------------------
Summary of changes:
op_reg_common.h | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/op_reg_common.h b/op_reg_common.h
index 7d78005..f509650 100644
--- a/op_reg_common.h
+++ b/op_reg_common.h
@@ -73,7 +73,7 @@ get_regex_charset(const U32 flags)
{
/* Returns the enum corresponding to the character set in 'flags' */
- return (flags & RXf_PMf_CHARSET) >> _RXf_PMf_CHARSET_SHIFT;
+ return (regex_charset) ((flags & RXf_PMf_CHARSET) >>
_RXf_PMf_CHARSET_SHIFT);
}
/* Next available bit after the above. Name begins with '_' so won't be
--
Perl5 Master Repository
