mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 14:19:10 -04:00
more tests
This commit is contained in:
parent
46929ef1cb
commit
d356b70c3f
1 changed files with 9 additions and 2 deletions
|
@ -10,10 +10,17 @@ use t::lib::Test;
|
|||
use Test::More;
|
||||
use Test::NoWarnings;
|
||||
|
||||
plan tests => 9;
|
||||
my @values = qw/
|
||||
0 1 1.0 1.0e+001 0000 01010101 10010101
|
||||
0000002100000517
|
||||
0000002200000517
|
||||
0000001e00000517
|
||||
00002.000
|
||||
/;
|
||||
|
||||
plan tests => @values * 2 + 1;
|
||||
|
||||
# no type specification
|
||||
my @values = qw/ 0 1 1.0 1.0e+001 /;
|
||||
for my $value (@values) {
|
||||
my $dbh = connect_ok( RaiseError => 1, AutoCommit => 1 );
|
||||
$dbh->do('create table foo (string)');
|
||||
|
|
Loading…
Add table
Reference in a new issue