X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FFunction-Parameters.git;a=blobdiff_plain;f=Parameters.xs;h=904ea25a157f6a3e47833850abf7a8e4af6f8307;hp=7129ddf2712948e25eb2fb24d8bdfcf05e933f6c;hb=59016bfbf00d500121a167cd7fdac1d15aae541d;hpb=ee1790924d73742e27c3a760ce97c8b03fc8c9bb diff --git a/Parameters.xs b/Parameters.xs index 7129ddf..904ea25 100644 --- a/Parameters.xs +++ b/Parameters.xs @@ -150,15 +150,12 @@ static void free_ptr_op(pTHX_ void *vp) { Safefree(pp); } -#define sv_eq_pvs(SV, S) sv_eq_pvn(aTHX_ SV, "" S "", sizeof (S) - 1) +#define sv_eq_pvs(SV, S) my_sv_eq_pvn(aTHX_ SV, "" S "", sizeof (S) - 1) -static int sv_eq_pvn(pTHX_ SV *sv, const char *p, STRLEN n) { +static int my_sv_eq_pvn(pTHX_ SV *sv, const char *p, STRLEN n) { STRLEN sv_len; const char *sv_p = SvPV(sv, sv_len); - return - sv_len == n && - memcmp(sv_p, p, n) == 0 - ; + return memcmp(sv_p, p, n) == 0; }