Author: stas
Date: Fri Jul 8 12:10:18 2005
New Revision: 209862
URL: http://svn.apache.org/viewcvs?rev=209862&view=rev
Log:
blead perl fix: casting warning
Modified:
perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h
Modified: perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h
URL:
http://svn.apache.org/viewcvs/perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h?rev=209862&r1=209861&r2=209862&view=diff
==============================================================================
--- perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h (original)
+++ perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h Fri Jul 8 12:10:18 2005
@@ -18,7 +18,7 @@
Perl_newSVpvf(aTHX_ "0x%lx", (unsigned long)aTHX)
#else
#define mpxs_ModPerl__Util_current_perl_id() \
- Perl_newSVpvf(aTHX_ "0x%lx", 0)
+ Perl_newSVpvf(aTHX_ "0x%lx", (unsigned long)0)
#endif
static MP_INLINE void mpxs_ModPerl__Util_untaint(pTHX_ I32 items,
