Platform-neutral quoting in optree_misc.t.

p4raw-id: //depot/perl@32194

diff --git a/ext/B/t/optree_misc.t b/ext/B/t/optree_misc.t
index 38712be..bcb0f2e 100644 (file)
--- a/ext/B/t/optree_misc.t
+++ b/ext/B/t/optree_misc.t
@@ -100,7 +100,7 @@ if ($] < 5.009) {
 } 
 
 checkOptree ( name      => 'index and PVBM',
-             prog      => '$_ = index "foo", "foo"',
+             prog      => '$_ = index q(foo), q(foo)',
              strip_open_hints => 1,
              expect    => $t,  expect_nt => $nt);