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,


Reply via email to