mirror of
https://github.com/nArnoSNES/tcc-65816.git
synced 2024-06-13 04:29:31 +00:00
50 lines
754 B
C
50 lines
754 B
C
|
/* { dg-do run { target fpic } } */
|
||
|
/* { dg-options "-O2 -fpic" } */
|
||
|
/* { dg-bogus "\[Uu\]nresolved symbol .(_GLOBAL_OFFSET_TABLE_|\[_.A-Za-z\]\[_.0-9A-Za-z\]*@(PLT|GOT|GOTOFF))" "PIC unsupported" { xfail *-*-netware* } 0 } */
|
||
|
|
||
|
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);
|
||
|
}
|