URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [20010912-1.c] - Rev 298
Compare with Previous | Blame | View Log
/* { dg-do run { target fpic } } */ /* { dg-options "-O2 -fpic" } */ extern void abort (void); extern void exit (int); int bar (int x, char **y) { if (x != 56) abort (); if (**y != 'a') abort (); *y = "def"; return 1; } int baz (int x, char **y) { if (x != 56) abort (); if (**y != 'a') abort (); return 26; } int foo (int x, char *y) { int a; char *b = y; a = bar (x, &y); if (a) { y = b; a = baz (x, &y); } if (a) return a; baz (x, &y); return 0; } int main () { if (foo (56, "abc") != 26) abort (); exit (0); }