URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [20040907-1.c] - Blame information for rev 749

Go to most recent revision | Details | Compare with Previous | View Log


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;
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`void ProdWord_bla ( gtL, gtRes, lnL )`
2			`int gtL, gtRes;`
3			`int lnL;`
4			`{`
5			`while ( 1 < lnL )`
6			`{`
7			`gtRes++ = gtL++;`
8			`--lnL;`
9			`}`
10			`if ( 0 < lnL )`
11			`if ( gtL[0] == gtL[1] )`
12			`*gtRes++ = 0;`
13			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [20040907-1.c] - Blame information for rev 749