[perl #40204] line numbers of runtime errors are one too low

[via RT]

# New Ticket Created by  Chip Salzenberg 
# Please include the string:  [perl #40204]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40204 >


Runtime errors seem to be off by one these days.  Anybody play with line
numbering recently?

Given this source:

    .sub foo :main
            P0 = new .Hash
            P1 = P0['x']
            unless P1 goto no
            print "yes\n"
      no:
    .end

The message claims line number 3:

    Null PMC access in get_bool()
    current instr.: 'foo' pc 7 (/tmp/line.pir:3)

Whereas the actual error is on line 4.
-- 
Chip Salzenberg <[EMAIL PROTECTED]>