On Tuesday 01 July 2008 09:23:58 NotFound wrote:
> This patch solves the issue, the lexid string was stored before truncating
> it.
Thanks, applied (with Patrick's test case) as r28911.
-- c
On Tue, Jul 1, 2008 at 4:44 PM, Patrick R. Michaud (via RT)
<[EMAIL PROTECTED]> wrote:
> $ cat x.pir
> .sub 'main'
> 'foo'()
> 'bar'()
> .end
>
> .sub 'foo'
> new $P0, "String"
> assign $P0, "abc"
> say $P0
> .end
>
> .sub 'bar' :lexid("abc")
> new
# New Ticket Created by Patrick R. Michaud
# Please include the string: [perl #56508]
# in the subject line of all future correspondence about this issue.
# http://rt.perl.org/rt3/Ticket/Display.html?id=56508 >
In r28897:
$ cat x.pir
.sub 'main'
'foo'()
'bar'()
.end
