[svn:DBD-Pg] r11262 - DBD-Pg/trunk

[turnstep]

Author: turnstep
Date: Tue May 13 07:56:18 2008
New Revision: 11262

Modified:
   DBD-Pg/trunk/dbdimp.c

Log:
Let's just suck up the "variable not used" warnings: they are better than the 
"cast from pointer to integer of different size" we're seeing on some platforms.


Modified: DBD-Pg/trunk/dbdimp.c
==============================================================================
--- DBD-Pg/trunk/dbdimp.c       (original)
+++ DBD-Pg/trunk/dbdimp.c       Tue May 13 07:56:18 2008
@@ -604,7 +604,7 @@
        char * key = SvPV(keysv,kl);
        SV *   retsv = Nullsv;
        
-       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_db_FETCH (key: %s dbh: %d)\n", 
THEADER, key, (int)dbh);
+       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_db_FETCH (key: %s)\n", THEADER, 
dbh ? key : key);
        
        switch (kl) {
 
@@ -851,7 +851,7 @@
        SV *              retsv = Nullsv;
        int               fields, x;
 
-       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_FETCH (key: %s sth: %d)\n", 
THEADER, key, (int)sth);
+       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_FETCH (key: %s)\n", THEADER, 
key);
        
        /* Some can be done before we have a result: */
        switch (kl) {
@@ -1186,8 +1186,8 @@
        char * value = SvPV(valuesv,vl);
        int    retval = 0;
 
-       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_STORE (key: %s value: %s sth: 
%d)\n",
-                                       THEADER, key, value, (int)sth);
+       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_STORE (key: %s value: %s)\n",
+                                       THEADER, key, value);
        
        switch (kl) {
 
@@ -1246,7 +1246,7 @@
 {
        dTHX;
 
-       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_discon_all (drh: %d)\n", 
THEADER, (int)drh);
+       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_discon_all\n", THEADER);
 
        /* The disconnect_all concept is flawed and needs more work */
        if (!PL_dirty && !SvTRUE(perl_get_sv("DBI::PERL_ENDING",0))) {
@@ -1266,7 +1266,7 @@
 {
        dTHX;
 
-       if (TSTART) TRC(DBILOGFP, "%sBegin pg_db_getfd (dbh: %d)\n", THEADER, 
(int)dbh);
+       if (TSTART) TRC(DBILOGFP, "%sBegin pg_db_getfd\n", THEADER);
 
        TRACE_PQSOCKET;
        return PQsocket(imp_dbh->conn);
@@ -3336,7 +3336,7 @@
 {
        dTHX;
 
-       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_rows (sth: %d)\n", THEADER, 
(int)sth);
+       if (TSTART) TRC(DBILOGFP, "%sBegin dbd_st_rows\n", THEADER);
 
        return imp_sth->rows;