id,summary,reporter,owner,description,type,status,priority,milestone,component,version,severity,resolution,keywords,cc,lang,patch,platform
1663,Mixture of dyn opcodes,fperrad,plobsing,"Since the merge of ops_massacre, all scripts setup.pir end without doing there job.

Here a minimalist example
{{{
.sub 'main' :main
    .param pmc args
    $S0 = shift args
    load_bytecode 'distutils.pbc'

    $P0 = new 'Hash'
    $P1 = new 'Hash'
    $P1['runtime/parrot/library/osutils.pbc'] = 'runtime/parrot/library/osutils.pir'
    $P0['pbc_pir'] = $P1

    .tailcall setup(args :flat, $P0 :flat :named)
.end
}}}

Here, the trailer of trace mode
{{{
044c find_sub_not_null P3, ""newer""                                        P3=PMCNULL 
044f invokecc P3                                        P3=MultiSub=PMC(0xa292d8)
0092 get_params PC28 (2), S0, S1                                        PC28=FixedIntegerArray=PMC(0xa29218) S0="""" S1=""""
0096 localtime S0, I0                                        S0=""runtime/parrot/libra"" I0=0
0099 end
FileHandle objects (like stdout and stderr)are about to be closed, so clearing trace flags.
}}}

The opcodes 'localtime' & 'end' are called.
But the code of this function is (in runtime/parrot/library/osutils.pir):
{{{
.sub 'newer' :multi(string, string)
    .param string target
    .param string depend
    $I0 = stat target, .STAT_EXISTS
    unless $I0 goto L1
    $I0 = stat target, .STAT_FILESIZE
    unless $I0 goto L1
    goto L2
  L1:
    .return (0)
  L2:
    $I1 = stat target, .STAT_MODIFYTIME
    $I2 = stat depend, .STAT_MODIFYTIME
    $I0 = $I1 > $I2
    .return ($I0)
.end
}}}

localtime & stat are now dynamic opcode in 2 different shared libraries (sys_ops & io_ops).

",bug,closed,critical,,core,2.4.0,high,fixed,,,,new,