*
* The various bootstrap definitions can take care of doing
* package-specific newXS() calls. Since the layout of the
- * bundled lib/*.pm files is in a version-specific directory,
+ * bundled *.pm files is in a version-specific directory,
* version checks in these bootstrap calls are optional.
*/
newXS("attributes::bootstrap", XS_attributes_bootstrap, file);
}
-#ifdef PERL_OBJECT
-#define NO_XSLOCKS
-#endif /* PERL_OBJECT */
-
#include "XSUB.h"
static int
for (nret = 0 ; numattrs && (attr = *attrlist++); numattrs--) {
name = SvPV(attr, len);
- if (negated = (*name == '-')) {
+ if ((negated = (*name == '-'))) {
name++;
len--;
}
XS(XS_attributes__warn_reserved)
{
dXSARGS;
- SV *rv, *sv;
#ifdef dXSTARGET
dXSTARGET;
#else