Changeset 22912 for t

Show
Ignore:
Timestamp:
11/07/08 07:18:44 (2 months ago)
Author:
pmichaud
Message:

[spec]: Add tests that "$a" and "{3}" return Str.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • t/spec/S02-literals/string-interpolation.t

    r22462 r22912  
    33use Test; 
    44 
    5 plan 6; 
     5plan 8; 
    66 
    77{ 
    … …  
    1818    is "{;;;;;;\1;42}", "42", '{\\1 parses correctly (3)'; 
    1919} 
     20 
     21{ 
     22    # interpolating into double quotes results in a Str 
     23    my $a = 3; 
     24    ok "$a" ~~ Str, '"$a" results in a Str'; 
     25    ok "{3}" ~~ Str, '"{3}" results in a Str'; 
     26}