#!/usr/bin/perl -w
# -*- perl -*-
# By Slavan Rezic <slaven@rezic.de> 2003-07-29
use strict;
use Test;
use lib "t/testmods";
use I;
BEGIN { plan tests => 3 }
my $i_obj = I->new;
ok(ref $i_obj, "I");
ok($i_obj->a_method, 42);
ok(ref $i_obj, "Another::Class");