blob: d1dd6f22ddccd400216f29a89d203ca492d4ca3d [file] [log] [blame]
void ProdWord_bla ( gtL, gtRes, lnL )
int *gtL, *gtRes;
int lnL;
{
while ( 1 < lnL )
{
*gtRes++ = *gtL++;
--lnL;
}
if ( 0 < lnL )
if ( gtL[0] == gtL[1] )
*gtRes++ = 0;
}