[svn:dbi] r15353 - dbi/trunk

[timbo]

Author: timbo
Date: Fri Jul 13 05:31:30 2012
New Revision: 15353

Modified:
   dbi/trunk/Driver.xst
   dbi/trunk/Driver_xst.h
   dbi/trunk/dbixs_rev.h

Log:
Fixed unused variable / self-assignment compiler warnings

Modified: dbi/trunk/Driver.xst
==============================================================================
--- dbi/trunk/Driver.xst        (original)
+++ dbi/trunk/Driver.xst        Fri Jul 13 05:31:30 2012
@@ -15,7 +15,7 @@
 PROTOTYPES: DISABLE
 
 BOOT:
-    items = 0;  /* avoid 'unused variable' warning */
+    PERL_UNUSED_VAR(items);
     DBISTATE_INIT;
     /* XXX this interface will change: */
     DBI_IMP_SIZE("DBD::~DRIVER~::dr::imp_data_size", sizeof(imp_drh_t));
@@ -46,7 +46,7 @@
         disconnect_all = 1
     CODE:
     D_imp_drh(drh);
-    if (0) ix = ix;     /* avoid unused variable warning */
+    PERL_UNUSED_VAR(ix);
     ST(0) = dbd_discon_all(drh, imp_drh) ? &PL_sv_yes : &PL_sv_no;
 
 #endif /* dbd_discon_all */
@@ -623,7 +623,7 @@
     CODE:
     D_imp_sth(sth);
     AV *av;
-    if (0) ix = ix;     /* avoid unused variable warning */
+    PERL_UNUSED_VAR(ix);
     av = dbd_st_fetch(sth, imp_sth);
     ST(0) = (av) ? sv_2mortal(newRV((SV *)av)) : &PL_sv_undef;
 
@@ -644,7 +644,7 @@
         for(i=0; i < num_fields; ++i) {
             PUSHs(AvARRAY(av)[i]);
         }
-        if (0) ix = ix; /* avoid unused variable warning */
+        PERL_UNUSED_VAR(ix);
     }
 
 
@@ -731,7 +731,7 @@
     CODE:
     D_imp_sth(sth);
     SV *valuesv;
-    if (0) ix = ix;     /* avoid unused variable warning */
+    PERL_UNUSED_VAR(ix);
     valuesv = dbd_st_FETCH_attrib(sth, imp_sth, keysv);
     if (!valuesv)
         valuesv = DBIc_DBISTATE(imp_sth)->get_attr(sth, keysv);

Modified: dbi/trunk/Driver_xst.h
==============================================================================
--- dbi/trunk/Driver_xst.h      (original)
+++ dbi/trunk/Driver_xst.h      Fri Jul 13 05:31:30 2012
@@ -28,7 +28,7 @@
     if (debug >= 3) {
        PerlIO_printf(DBIc_LOGPIO(imp_xxh),
            "    -> %s (trampoline call with %d (%ld) params)\n", methname, 
params, (long)items);
-       xxx = xxx; /* avoid unused var warning */
+       PERL_UNUSED_VAR(xxx);
     }
     EXTEND(SP, params);
     PUSHMARK(SP);

Modified: dbi/trunk/dbixs_rev.h
==============================================================================
--- dbi/trunk/dbixs_rev.h       (original)
+++ dbi/trunk/dbixs_rev.h       Fri Jul 13 05:31:30 2012
@@ -1,4 +1,4 @@
-/* Wed Apr 18 12:37:44 2012 */
-/* Mixed revision working copy (15267M:15268) */
+/* Fri Jul 13 13:29:50 2012 */
+/* Mixed revision working copy (15349M:15352) */
 /* Code modified since last checkin */
-#define DBIXS_REVISION 15267
+#define DBIXS_REVISION 15349