Searched defs:OBJ_REAL2 (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/
H A Drecurse.t110 package OBJ_REAL2; package
167 $real = OBJ_REAL2->make;
170 ok 14, $OBJ_REAL2::recursed == $OBJ_REAL2::MAX;
171 ok 15, $OBJ_REAL2::hook_called == $OBJ_REAL2::MAX;
175 ok 17, $OBJ_REAL2::recursed == 0;
179 ok 19, ref $x eq 'OBJ_REAL2';
180 ok 20, $OBJ_REAL2::recursed == 0;
181 ok 21, $OBJ_REAL2
[all...]

Completed in 21 milliseconds