File: 00_compile.t

package info (click to toggle)
libtest-inline-perl 2.103-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 372 kB
  • ctags: 225
  • sloc: perl: 3,320; makefile: 43
file content (36 lines) | stat: -rw-r--r-- 921 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#!/usr/bin/perl -w

# Compile testing for Test::Inline

use strict;
use lib ();
use UNIVERSAL 'isa';
use File::Spec::Functions ':ALL';
BEGIN {
	$| = 1;
	unless ( $ENV{HARNESS_ACTIVE} ) {
		require FindBin;
		chdir ($FindBin::Bin = $FindBin::Bin); # Avoid a warning
		lib->import( catdir( updir(), updir(), 'modules') );
	}
}

use Test::More tests => 11;

# Check their perl version
ok( $] >= 5.005, "Your perl is new enough" );

# Does the module load
use Class::Autouse ':devel';
use_ok('Test::Inline::Content'          );
use_ok('Test::Inline::Content::Legacy'  );
use_ok('Test::Inline::Content::Default' );
use_ok('Test::Inline::Content::Simple'  );
use_ok('Test::Inline::Extract'          );
use_ok('Test::Inline::IO::File'         );
use_ok('Test::Inline'                   );
use_ok('Test::Inline::Util'             );
use_ok('Test::Inline::Script'           );
use_ok('Test::Inline::Section'          );

exit(0);