X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xsutils.c;h=02fab512030b33e032509ef12d01b37f101c7393;hb=e277ebbfff2cc1c7947da9ad3d8fab33a272bc5c;hp=f9d5e0d28bb6fe4ae62beaace26b21fd72895148;hpb=d20626d86bf3d55ba658adbc2678de4c519cbc6c;p=p5sagit%2Fp5-mst-13.2.git diff --git a/xsutils.c b/xsutils.c index f9d5e0d..02fab51 100644 --- a/xsutils.c +++ b/xsutils.c @@ -23,7 +23,7 @@ void XS_attributes_bootstrap(pTHXo_ CV *cv); * * 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. */ @@ -48,7 +48,7 @@ modify_SV_attributes(pTHXo_ SV *sv, SV **retlist, SV **attrlist, int numattrs) for (nret = 0 ; numattrs && (attr = *attrlist++); numattrs--) { name = SvPV(attr, len); - if (negated = (*name == '-')) { + if ((negated = (*name == '-'))) { name++; len--; } @@ -271,7 +271,6 @@ usage: XS(XS_attributes__warn_reserved) { dXSARGS; - SV *rv, *sv; #ifdef dXSTARGET dXSTARGET; #else