Suppress test warning added by 04698ff6

diff --git a/t/op/hash.t b/t/op/hash.t
index fe8a856..278bea7 100644 (file)
--- a/t/op/hash.t
+++ b/t/op/hash.t
@@ -142,7 +142,7 @@ is($destroyed, 1, 'Timely hash destruction with lvalue keys');
     sub FETCH { $key = $_[1] }
     package main;
     tie my %h, "bar";
-    $h{\'foo'};
+    () = $h{\'foo'};
     is ref $key, SCALAR =>
      'hash keys are not stringified during compilation';
 }