id,summary,reporter,owner,description,type,status,priority,milestone,component,version,severity,resolution,keywords,cc,lang,patch,platform
1674,Strange string (non)numification,pmichaud,,"From an observation by patrickas on #perl6:

{{{
pmichaud@orange:~/parrot/trunk$ cat ../x.pir
.sub main
    $S0 = ""6foo""
    $N0 = $S0
    print $S0
    print "" = ""
    say $N0

    $S0 = ""16foo""
    $N0 = $S0
    print $S0
    print "" = ""
    say $N0
.end

pmichaud@orange:~/parrot/trunk$ ./parrot ../x.pir 
6foo = 0
16foo = 16
pmichaud@orange:~/parrot/trunk$ 
}}}

This has apparently been around for a long time -- since at least Parrot 1.4.0.  It was working fine in Parrot 1.0.0, though:

{{{
pmichaud@orange:~/parrot/RELEASE_1_0_0$ cat ../x.pir
.sub main
    $S0 = ""6foo""
    $N0 = $S0
    print $S0
    print "" = ""
    say $N0

    $S0 = ""16foo""
    $N0 = $S0
    print $S0
    print "" = ""
    say $N0
.end

pmichaud@orange:~/parrot/RELEASE_1_0_0$ ./parrot ../x.pir
6foo = 6
16foo = 16
pmichaud@orange:~/parrot/RELEASE_1_0_0$ 
}}}
",bug,closed,normal,,none,2.4.0,medium,fixed,,,,,