$h{b} = 4;
for (0, 2) { is($c[$_], 1, "store magic $_ after dispelled 1"); }
is($h{b}, 4, 'store magic after dispelled 1 doesn\'t clobber');
$h{b} = 4;
for (0, 2) { is($c[$_], 1, "store magic $_ after dispelled 1"); }
is($h{b}, 4, 'store magic after dispelled 1 doesn\'t clobber');