/* gv.c
*
* Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
- * 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 by Larry Wall and others
+ * 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 by Larry Wall and others
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
else if ( lex_mask && SvPOK(lex_mask) ) {
/* we have an entry in the hints hash, check if method has been
* masked by overloading.pm */
+ STRLEN len;
const int offset = method / 8;
const int bit = method % 7;
- STRLEN len;
char *pv = SvPV(lex_mask, len);
+ /* Bit set, so this overloading operator is disabled */
if ( (STRLEN)offset <= len && pv[offset] & ( 1 << bit ) )
return NULL;
}