At 4:59 PM -0500 11/12/04, Matt Diephouse wrote:
On Fri, 12 Nov 2004 10:16:31 -0800, via RT Gopal V
<[EMAIL PROTECTED]> wrote:
 # New Ticket Created by  Gopal V
 # Please include the string:  [perl #32421]
 # in the subject line of all future correspondence about this issue.
 # <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=32421 >

 The following code segfaults with parrot poicephalus

 .sub _MAIN
     $I0=1
     if$I0 < 2  goto LBL1
 LBL1:
     end
     ret
 .end

Fix at your leisure :)

The code works if you put a space between "if" and "$I0":

Right, but the pir parser shouldn't segfault on bad input. -- Dan

--------------------------------------it's like this-------------------
Dan Sugalski                          even samurai
[EMAIL PROTECTED]                         have teddy bears and even
                                      teddy bears get drunk

Reply via email to