blob: 898650656806e165e927daa6d539f6fb60b426d8 [file] [log] [blame]
/* { dg-do run } */
/* { dg-options "-mno-plt" } */
extern void abort (void);
struct lispstruct
{
int e;
int t;
};
struct lispstruct Cnil_body;
struct lispstruct Ct_body;
int nvalues;
struct lispstruct * __attribute__ ((noinline))
fLlistp (struct lispstruct *x0)
{
if (x0 == &Cnil_body
|| (((unsigned long) x0 >= 0x80000000) ? 0
: (!x0->e ? (x0 != &Cnil_body) : x0->t)))
x0 = &Ct_body;
else
x0 = &Cnil_body;
nvalues = 1;
return x0;
}
int main ()
{
if (fLlistp ((struct lispstruct *) 0xa0000001) != &Cnil_body)
abort ();
return 0;
}