[svn:dbd-oracle] r14689 - dbd-oracle/trunk
[email protected] Tue, 8 Feb 2011 10:55:07 -0800 (PST)
| Newsgroups | perl.dbd.oracle.changes |
|---|---|
| Message-ID | <[email protected]> |
Author: mjevans
Date: Tue Feb 8 10:55:07 2011
New Revision: 14689
Modified:
dbd-oracle/trunk/dbdimp.c
Log:
Some parts of the patch sent to John missed off his update which cause compiler errors
Modified: dbd-oracle/trunk/dbdimp.c
==============================================================================
--- dbd-oracle/trunk/dbdimp.c (original)
+++ dbd-oracle/trunk/dbdimp.c Tue Feb 8 10:55:07 2011
@@ -1355,13 +1355,13 @@
retsv = newSViv(imp_dbh->using_drcp);
}
else if (kl==14 && strEQ(key, "ora_drcp_class") ) {
- retsv = newSVpv(imp_dbh->pool_class);
+ retsv = newSVpv((char *)imp_dbh->pool_class, 0);
}
else if (kl==12 && strEQ(key, "ora_drcp_min") ) {
retsv = newSViv(imp_dbh->pool_min);
}
else if (kl==12 && strEQ(key, "ora_drcp_max") ) {
- retsv = newSViv(imp_dbh->pool_max));
+ retsv = newSViv(imp_dbh->pool_max);
}
else if (kl==13 && strEQ(key, "ora_drcp_incr") ) {
retsv = newSViv(imp_dbh->pool_incr);
@@ -3653,7 +3653,7 @@
}
}
- int
+int
ora_st_execute_array(sth, imp_sth, tuples, tuples_status, columns, exe_count)
SV *sth;
imp_sth_t *imp_sth;