M6502/t/00-load.t

#!/usr/bin/perl

use Test::More tests => 4;

BEGIN {
use blib;
use_ok( 'Arch' );
use_ok( 'M6502' );
use_ok( 'Orao' );
use_ok( 'Screen' );
}

diag( "Testing M6502 $M6502::VERSION, Perl 5.008008, /usr/bin/perl" );

ok( M6502::run(), 'run' );
1	dpavlin	29	#!/usr/bin/perl
2	dpavlin	2
3	dpavlin	33	use Test::More tests => 4;
4	dpavlin	29
5	dpavlin	2	BEGIN {
6	dpavlin	80	use blib;
7	dpavlin	33	use_ok( 'Arch' );
8	dpavlin	29	use_ok( 'M6502' );
9	dpavlin	2	use_ok( 'Orao' );
10	dpavlin	29	use_ok( 'Screen' );
11	dpavlin	2	}
12
13	dpavlin	29	diag( "Testing M6502 $M6502::VERSION, Perl 5.008008, /usr/bin/perl" );
14	dpavlin	80
15			ok( M6502::run(), 'run' );