|
Packit |
723767 |
#!/usr/bin/perl
|
|
Packit |
723767 |
|
|
Packit |
723767 |
# Test that everything compiles, so the rest of the test suite can
|
|
Packit |
723767 |
# load modules without having to check if it worked.
|
|
Packit |
723767 |
|
|
Packit |
723767 |
use strict;
|
|
Packit |
723767 |
BEGIN {
|
|
Packit |
723767 |
$| = 1;
|
|
Packit |
723767 |
$^W = 1;
|
|
Packit |
723767 |
}
|
|
Packit |
723767 |
|
|
Packit |
723767 |
use Test::More tests => 3;
|
|
Packit |
723767 |
|
|
Packit |
723767 |
use lib "t/lib";
|
|
Packit |
723767 |
|
|
Packit |
723767 |
use_ok('DBI');
|
|
Packit |
723767 |
use_ok('DBD::SQLite');
|
|
Packit |
723767 |
use_ok('SQLiteTest');
|
|
Packit |
723767 |
|
|
Packit |
723767 |
diag("\$DBI::VERSION=$DBI::VERSION");
|
|
Packit |
723767 |
|
|
Packit |
723767 |
if (my @compile_options = DBD::SQLite::compile_options()) {
|
|
Packit |
723767 |
diag("Compile Options:");
|
|
Packit |
723767 |
diag(join "", map { " $_\n" } @compile_options);
|
|
Packit |
723767 |
}
|