X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/be108a016385ee2de75d92fc5b823e024301789e..a6de8fc77bb1ac413d5a5868104c8b2c555ce6d8:/ext/Devel-Peek/t/Peek.t

diff --git a/ext/Devel-Peek/t/Peek.t b/ext/Devel-Peek/t/Peek.t
index 492b8ed..643ff45 100644
--- a/ext/Devel-Peek/t/Peek.t
+++ b/ext/Devel-Peek/t/Peek.t
@@ -493,6 +493,7 @@ do_test('typeglob',
   NAME = "a"
   NAMELEN = 1
   GvSTASH = $ADDR\\t"main"
+  FLAGS = $ADDR					# $] >=5.021004
   GP = $ADDR
     SV = $ADDR
     REFCNT = 1
@@ -505,7 +506,7 @@ do_test('typeglob',
     GPFLAGS = 0x0				# $] < 5.009
     LINE = \\d+
     FILE = ".*\\b(?i:peek\\.t)"
-    FLAGS = $ADDR
+    FLAGS = $ADDR				# $] < 5.021004
     EGV = $ADDR\\t"a"');
 
 if (ord('A') == 193) {