and VSTRING was only 5.10+
Jesse Luehrs [Mon, 8 Aug 2011 14:59:26 +0000 (09:59 -0500)]
t/scalar-values.t

index 849d7c1..b2daebe 100644 (file)
@@ -46,7 +46,7 @@ is(exception { $Bar->add_symbol('$pvlv', \substr($pvlv, 0, 1)) }, undef,
    "can add PVLV values");
 
 my $vstring = v1.2.3;
-is(reftype(\$vstring), 'VSTRING');
+is(reftype(\$vstring), ($] < 5.010 ? 'SCALAR' : 'VSTRING'));
 is(exception { $Bar->add_symbol('$vstring', \$vstring) }, undef,
    "can add vstring values");