is($@, '', "getdata in thread $tid doesn't croak");
is($d, 5 + $tid, "getdata in thread $tid returns the right thing");
eval { $a = 9 };
is($@, '', "set in thread $tid (check opname) doesn't croak");
if ($dispell) {
is($@, '', "getdata in thread $tid doesn't croak");
is($d, 5 + $tid, "getdata in thread $tid returns the right thing");
eval { $a = 9 };
is($@, '', "set in thread $tid (check opname) doesn't croak");
if ($dispell) {