URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [struct-by-value-1.c] - Rev 154
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test structure passing by value. */ /* { dg-do run } */ /* { dg-options "-O2" } */ #define T(N) \ struct S##N { unsigned char i[N]; }; \ struct S##N g1s##N, g2s##N, g3s##N; \ \ void \ init##N (struct S##N *p, int i) \ { \ int j; \ for (j = 0; j < N; j++) \ p->i[j] = i + j; \ } \ \ void \ check##N (struct S##N *p, int i) \ { \ int j; \ for (j = 0; j < N; j++) \ if (p->i[j] != i + j) abort (); \ } \ \ void \ test##N (struct S##N s1, struct S##N s2, \ struct S##N s3) \ { \ check##N (&s1, 64); \ check##N (&s2, 128); \ check##N (&s3, 192); \ } \ \ void \ test2_##N (struct S##N s1, struct S##N s2) \ { \ test##N (s1, g2s##N, s2); \ } \ \ void \ testit##N (void) \ { \ init##N (&g1s##N, 64); \ check##N (&g1s##N, 64); \ init##N (&g2s##N, 128); \ check##N (&g2s##N, 128); \ init##N (&g3s##N, 192); \ check##N (&g3s##N, 192); \ test##N (g1s##N, g2s##N, g3s##N); \ test2_##N (g1s##N, g3s##N); \ } extern void abort (void); extern void exit (int); T(0) T(1) T(2) T(3) T(4) T(5) T(6) T(7) T(8) T(9) T(10) T(11) T(12) T(13) T(14) T(15) T(16) T(17) T(18) T(19) T(20) T(21) T(22) T(23) T(24) T(25) T(26) T(27) T(28) T(29) T(30) T(31) T(32) T(33) T(34) T(35) T(36) T(37) T(38) T(39) T(40) T(41) T(42) T(43) T(44) T(45) T(46) T(47) T(48) T(49) T(50) T(51) T(52) T(53) T(54) T(55) T(56) T(57) T(58) T(59) T(60) T(61) T(62) T(63) #undef T int main () { #define T(N) testit##N (); T(0) T(1) T(2) T(3) T(4) T(5) T(6) T(7) T(8) T(9) T(10) T(11) T(12) T(13) T(14) T(15) T(16) T(17) T(18) T(19) T(20) T(21) T(22) T(23) T(24) T(25) T(26) T(27) T(28) T(29) T(30) T(31) T(32) T(33) T(34) T(35) T(36) T(37) T(38) T(39) T(40) T(41) T(42) T(43) T(44) T(45) T(46) T(47) T(48) T(49) T(50) T(51) T(52) T(53) T(54) T(55) T(56) T(57) T(58) T(59) T(60) T(61) T(62) T(63) #undef T exit (0); }
Go to most recent revision | Compare with Previous | Blame | View Log