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

Subversion Repositories openrisc

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

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


typedef struct string STR;
typedef struct atbl ARRAY;
struct string {
    unsigned char str_pok;
};
struct atbl {
    int ary_fill;
};
blah(size,strp)
register int size;
register STR **strp;
{
    register ARRAY *ar;
    ar->ary_fill = size - 1;
    while (size--)
     (*strp)->str_pok &= ~128;
}
 

Line No.	Rev	Author	Line
1	688	jeremybenn	`typedef struct string STR;`
2			`typedef struct atbl ARRAY;`
3			`struct string {`
4			`unsigned char str_pok;`
5			`};`
6			`struct atbl {`
7			`int ary_fill;`
8			`};`
9			`blah(size,strp)`
10			`register int size;`
11			`register STR **strp;`
12			`{`
13			`register ARRAY *ar;`
14			`ar->ary_fill = size - 1;`
15			`while (size--)`
16			`(*strp)->str_pok &= ~128;`
17			`}`
18

Browse

Tools

Subversion Repositories openrisc

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