Re: [perl #17035] [PATCH] chr support => strange behavior

[Jerome Quelin]

On Dimanche 8 Septembre 2002 11:50, Peter Gibbs wrote :
> This looks like a COW bug. Try the attached patch (untested).

In fact, here's the minimal test case:
$ cat p.pasm <<EOF
        set S1, "abcdefvijkl"
        substr S0, S1, 6, 1
        ord I10, S0, 0
        print S0
        print "<\n>"
        print I10
        print "<\n"
        end
EOF
$ perl ../../assemble.pl p.pasm >P.pbc
$ ../../parrot P.pbc
>v<
>97<

And your patch handles the problem. Thanks.

Jérôme
-- 
[EMAIL PROTECTED]