[perl #24667] IMCC not handling some integer constant parameters properly

[via RT]

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


If, as part if a prototyped .pcc_begin/.pcc_end function call set,
you try and set an integer parameter equal to the register number the
integer would go into. If you do this, the assignment to that integer
register will be discarded and the register will have whatever it
started with in it. The upshot is that this:

    .pcc_begin prototyped
    .arg 1
    .arg 6
    .arg 7
    .pcc_call foo
    .pcc_end

emits this pasm:

    set_i_ic I5, 1
    set_p_p P0, P16

rather than this pasm

    set_i_ic I5, 1
    set_i_ic I6, 6
    set_i_ic I7, 7
    set_p_p P0, P16

Which, as you might expect, leads to some bizarre behaviour.
-- 
                                          Dan

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