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

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/
H A Dblessed.t38 package SHORT_NAME; package
67 \@ISA = ("SHORT_NAME");
83 push(@pool, SHORT_NAME->make);
96 ok 6, ref $y->[0] eq 'SHORT_NAME';
103 do { $good = 0; last } unless ref $y->[4*$i] eq 'SHORT_NAME';

Completed in 14 milliseconds