Searched refs:aClass (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Class/
H A DStruct.t11 package aClass; package
26 struct( s => '$', a => '@', h => '%', c => 'aClass' );
33 use Class::Struct s => '$', a => '@', h => '%', c => 'aClass';
64 $obj = MyObj->new( c => aClass->new );
65 isa_ok $obj->c, 'aClass';
91 $obj = MyOther->new( c => aClass->new );
92 isa_ok $obj->c, 'aClass';

Completed in 57 milliseconds