Author: timbo
Date: Mon Nov 15 07:37:40 2004
New Revision: 582
Modified:
dbi/trunk/Changes
dbi/trunk/DBI.pm
dbi/trunk/ToDo
dbi/trunk/t/01basics.t
Log:
Skip hash(,1) tests for PurePerl if Math::BigInt isn't recent enough.
Delete docs about limited driver support for bind_param_inout.
Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes (original)
+++ dbi/trunk/Changes Mon Nov 15 07:37:40 2004
@@ -4,7 +4,7 @@
=cut
-=head2 Changes in DBI 1.46 (svn rev 581), 14th November 2004
+=head2 Changes in DBI 1.46 (svn rev 582), 15th November 2004
Fixed parsing bugs in DBI::SQL::Nano thanks to Jeff Zucker.
Fixed a couple of bad links in docs thanks to Graham Barr.
Modified: dbi/trunk/DBI.pm
==============================================================================
--- dbi/trunk/DBI.pm (original)
+++ dbi/trunk/DBI.pm Mon Nov 15 07:37:40 2004
@@ -5031,11 +5031,6 @@
pick a generous length, i.e., a length larger than the longest value that
would ever be
returned. The only cost of using a larger value than needed is wasted memory.
-It is expected that few drivers will support this method. The only
-driver currently known to do so is DBD::Oracle (DBD::ODBC may support
-it in a future release). Therefore it should not be used for database
-independent applications.
-
Undefined values or C<undef> are used to indicate null values.
See also L</"Placeholders and Bind Values"> for more information.
Modified: dbi/trunk/ToDo
==============================================================================
--- dbi/trunk/ToDo (original)
+++ dbi/trunk/ToDo Mon Nov 15 07:37:40 2004
@@ -402,6 +402,13 @@
Okay. I'll take that as a vote for bind_param_by_ref as an alias for
bind_param_inout. >>todo.
+bind_param_by_ref (or bind_param_byref) could be provided as a fallback
+method using a BeforeExecute hook to call bind_param with the 'current value'
+from the reference.
+
+Should ParamValues hold the value or the ref?
+Use ParamAttr to indicate byref?
+
------
OTHERS:
Modified: dbi/trunk/t/01basics.t
==============================================================================
--- dbi/trunk/t/01basics.t (original)
+++ dbi/trunk/t/01basics.t Mon Nov 15 07:37:40 2004
@@ -242,8 +242,12 @@
cmp_ok(DBI::hash("foo1" ), '==', -1077531989, '... should be -1077531989');
cmp_ok(DBI::hash("foo1",0), '==', -1077531989, '... should be -1077531989');
cmp_ok(DBI::hash("foo2",0), '==', -1077531990, '... should be -1077531990');
+SKIP: {
+ skip("Math::BigInt < 1.56",2)
+ if $DBI::PurePerl && !eval { require Math::BigInt; require_version
Math::BigInt 9.56 };
cmp_ok(DBI::hash("foo1",1), '==', -1263462440, '... should be -1263462440');
cmp_ok(DBI::hash("foo2",1), '==', -1263462437, '... should be -1263462437');
+}
is(data_string_desc(""), "UTF8 off, ASCII, 0 characters 0 bytes");
is(data_string_desc(42), "UTF8 off, ASCII, 2 characters 2 bytes");