From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 15 Oct 2001 13:40:20 +0000 (+0000)
Subject: Casting tweak from Paul Marquess, helps Merijn on AIX.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3d7a97b7fa30a625b9fe2c67d227f0694f17108a;p=p5sagit%2Fp5-mst-13.2.git

Casting tweak from Paul Marquess, helps Merijn on AIX.

p4raw-id: //depot/perl@12443
---

diff --git a/ext/DB_File/DB_File.xs b/ext/DB_File/DB_File.xs
index d2dc572..db4382b 100644
--- a/ext/DB_File/DB_File.xs
+++ b/ext/DB_File/DB_File.xs
@@ -1253,7 +1253,7 @@ SV *   sv ;
 
            svp = hv_fetch(action, "flags", 5, FALSE);
 	   if (svp)
-	       (void)dbp->set_flags(dbp, SvIV(*svp)) ;
+              (void)dbp->set_flags(dbp, (u_int32_t)SvIV(*svp)) ;
    
            svp = hv_fetch(action, "cachesize", 9, FALSE);
 	   if (svp)