#!/usr/bin/perl
# Load testing for PPI::XS
# Tests to make sure that PPI::XS is autoloaded when PPI itself is loaded.
use strict;
BEGIN {
$| = 1;
$^W = 1;
}
use Test::More tests => 3;
use PPI;
# Double check PPI itself was loaded
ok( $PPI::VERSION, 'PPI was autoloaded by PPI::XS' );
ok( $PPI::Element::VERSION, 'The PDOM has been loaded' );
# Did PPI::XS get loaded?
ok( $PPI::XS::VERSION, 'PPI::XS was autoloaded ok' );