X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs-src%2FMouseTypeConstraints.xs;h=420703e3808aaa7c9f3f3e1f07edfd01ad9c74af;hb=678d19020b3220372bf3208506cd48b9f8c382b8;hp=af6b592caf9f97d2c3f140a805566e867e1ffc55;hpb=25ba356eb567d89ae015ad0789960b460c3ebf02;p=gitmo%2FMouse.git diff --git a/xs-src/MouseTypeConstraints.xs b/xs-src/MouseTypeConstraints.xs index af6b592..420703e 100644 --- a/xs-src/MouseTypeConstraints.xs +++ b/xs-src/MouseTypeConstraints.xs @@ -117,7 +117,7 @@ mouse_tc_Num(pTHX_ SV* const data PERL_UNUSED_DECL, SV* const sv) { return LooksLikeNumber(sv); } -int +static int S_nv_is_integer(pTHX_ NV const nv) { if(nv == (NV)(IV)nv){ return TRUE;