tests are expected to fail if dirfd () does not exist
[p5sagit/p5-mst-13.2.git] / t / op / tie.t
index bd1e980..2ea1285 100755 (executable)
@@ -294,7 +294,6 @@ sub FETCH { *a = \1; 1 }
 tie $a, 'main';
 print $a;
 EXPECT
-Tied variable freed while still in use at - line 6.
 ########
 
 #  [20020716.007] - nested FETCHES