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 (file)
--- 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)