From: mike Date: Mon, 29 Oct 2007 11:50:49 +0000 (+0000) Subject: Use STRLEN type for _unused_len instead of unsigned: this prevents a X-Git-Tag: cpan_1_22~23 X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=commitdiff_plain;ds=sidebyside;h=335b30a971618cba8b82fab99829a743e9324172;p=ZOOM-Perl-moved-to-github.git Use STRLEN type for _unused_len instead of unsigned: this prevents a (possibly serious) warning on some 64-bit architectures. --- diff --git a/typemap b/typemap index 3ceed40..2523a37 100644 --- a/typemap +++ b/typemap @@ -1,4 +1,4 @@ -# $Id: typemap,v 1.7 2006-11-03 09:37:57 mike Exp $ +# $Id: typemap,v 1.8 2007-10-29 11:50:49 mike Exp $ ZOOM_connection T_PTROBJ ZOOM_connection * T_PTROBJ @@ -67,7 +67,7 @@ T_OPAQUE_STRUCT else croak(\"$var is not of type ${ntype}\") T_OPAQUECHAR - { unsigned _unused_len; + { STRLEN _unused_len; $var = ($type) SvPV($arg, _unused_len); } # ---------------------------------------------------------------------------