Hi,
It's actually the best to change from line 101 to line 118 to
*my $numStr = NumStr(0);
if (-e "$TMPDIR/extract.$numStr")
{
`$extractCmd`;
}
if (-e "$TMPDIR/extract.$numStr.inv")
{
`$extractInvCmd`;
}
if (-e "$TMPDIR/extract.$numStr.o")
{
`$extractOrderingCmd`;
}
}
else
{
if (-e "$TMPDIR/extract.0")
{
rename "$TMPDIR/extract.0", "$extract";
}
if (-e "$TMPDIR/extract.0.inv")
{
rename "$TMPDIR/extract.0.inv", "$extract.inv";
}
if (-e "$TMPDIR/extract.0.o")
{
rename "$TMPDIR/extract.0.o", "$extract.o";
}
}*
The reason is that sometimes multiple tmp directories are created such as
in the sge situation and not all the files in question are in the same tmp
directory when being combined.
Cheers,
Guchun
On 15 February 2012 12:34, Guchun Zhang <[email protected]> wrote:
> Hi,
>
> I'd like to report a little bug inside generic/extract-parallel.perl on
> line 104. For the current code, the ordering file will never be produced
> under the parallel scenario as $TMPDIR/extract.0.o never exists.
>
> It's quite straightforward to remove the bug as follows,
>
> changing from
>
> if (-e "$TMPDIR/extract.0.o")
>
> to
>
> my $numStr = NumStr(0);
> if (-e "$TMPDIR/extract.$numStr.o").
>
> Cheers,
>
> Guchun
>
_______________________________________________
Moses-support mailing list
[email protected]
http://mailman.mit.edu/mailman/listinfo/moses-support
