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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20001017-1.c] - Diff between revs 297 and 338

Rev 297	Rev 338

`void bug (double *Cref, char transb, int m, int n, int k,`	`void bug (double *Cref, char transb, int m, int n, int k,`
`double a, double A, int fdA, double B, int fdB,`	`double a, double A, int fdA, double B, int fdB,`
`double b, double *C, int fdC)`	`double b, double *C, int fdC)`
`{`	`{`
`if (C != Cref) abort ();`	`if (C != Cref) abort ();`
`}`	`}`

`int main (void)`	`int main (void)`
`{`	`{`
`double A[1], B[1], C[1];`	`double A[1], B[1], C[1];`

`bug (C, 'B', 1, 2, 3, 4.0, A, 5, B, 6, 7.0, C, 8);`	`bug (C, 'B', 1, 2, 3, 4.0, A, 5, B, 6, 7.0, C, 8);`

`return 0;`	`return 0;`
`}`	`}`