.. Sequences/Intrinsic Metafunctions//begin
.. Copyright Aleksey Gurtovoy, David Abrahams 2007.
.. Distributed under the Boost
.. Software License, Version 1.0. (See accompanying
.. file LICENSE_1_0.
BEGIN {
if($ENV{PERL_CORE}) {
chdir 't';
@INC = '../lib';
}
}
use strict;
use Test;
BEGIN { plan tests => 61 };
my $d;
#use Pod::Simple::Debug (\$d, 0);
ok 1;
use Pod::Sim
Statement Close Fun Test starting
Statement test begin
beetle 5524
Statement Test failed (12)
beetle 5524
Statement Test failed (13)
Statement test end
Prepared Statement test begin
beetle 5524
Prepa
Beginning test: test1
Executing test: begin deleteAllRows,0 row test, create = true.
Executing test: no delete case complete.
Executing test: delete all rows case succeeded.
Executing test: end delete
Statement Close Fun Test starting
Statement test begin
Statement test end
Prepared Statement test begin
Prepared Statement test end
Callable Statement test begin
The result is 3
Callable Statement te
