trunk/t/EventManager.t

#!/usr/bin/perl -T

use Test::More tests => 3;
use Data::Dump qw/dump/;

use lib 'lib';

BEGIN {
        use_ok( 'Intel::AMT::EventManager' );
}

ok( my $o = Intel::AMT::EventManager::GetEventLogStatus(), 'GetEventLogStatus' );
diag dump( $o );

ok( my $o = Intel::AMT::EventManager::ReadEventLogRecords(), 'ReadEventLogRecords' );
diag dump( $o );
1	dpavlin	22	#!/usr/bin/perl -T
2
3			use Test::More tests => 3;
4			use Data::Dump qw/dump/;
5
6			use lib 'lib';
7
8			BEGIN {
9			use_ok( 'Intel::AMT::EventManager' );
10			}
11
12			ok( my $o = Intel::AMT::EventManager::GetEventLogStatus(), 'GetEventLogStatus' );
13			diag dump( $o );
14
15			ok( my $o = Intel::AMT::EventManager::ReadEventLogRecords(), 'ReadEventLogRecords' );
16			diag dump( $o );