gcc/testsuite/gcc.c-torture/execute/20001101.c

   1 /* { dg-require-effective-target untyped_assembly } */
   2 extern void abort(void);
   3 extern void exit(int);
   4
   5 typedef struct
   6 {
   7   unsigned int unchanging : 1;
   8 } struc, *rtx;
   9
  10 rtx dummy ( int *a, rtx *b)
  11 {
  12   *a = 1;
  13   *b = (rtx)7;
  14   return (rtx)1;
  15 }
  16
  17 void bogus (insn, thread, delay_list)
  18      rtx insn;
  19      rtx thread;
  20      rtx delay_list;
  21 {
  22   rtx new_thread;
  23   int must_annul;
  24
  25   delay_list = dummy ( &must_annul, &new_thread);
  26   if (delay_list == 0 &&  new_thread )
  27     {
  28       thread = new_thread;
  29     }
  30   if (delay_list && must_annul)
  31     insn->unchanging = 1;
  32   if (new_thread != thread )
  33     abort();
  34 }
  35
  36 int main()
  37 {
  38   struc baz;
  39   bogus (&baz, (rtx)7, 0);
  40   exit(0);
  41   return 0;
  42 }