(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.dg/
debug/
debug-5.c
       1  /* This testcase failed, because scope containing baz was deleted
       2     (spanned 0 basic blocks) and DWARF-2 couldn't find baz origin.  */
       3  /* { dg-do compile } */
       4  /* { dg-require-effective-target trampolines } */
       5  
       6  extern void abort (void);
       7  
       8  struct A { char *a, *b, *c, *d; };
       9  
      10  static int
      11  bar (struct A *x)
      12  {
      13    return x->c - x->b;
      14  }
      15  
      16  static int
      17  bar2 (struct A *x)
      18  {
      19    int a = x->c - x->b;
      20    x->c += 26;
      21    return a;
      22  }
      23  
      24  void fnptr (void (*fn) (void));
      25  
      26  void
      27  foo (void)
      28  {
      29    struct A e;
      30  
      31    if (bar2 (&e) < 0)
      32      abort ();
      33    {
      34      void baz (void)
      35        {
      36  	bar (&e);
      37        }
      38      fnptr (baz);
      39    }
      40    {
      41      struct A *f;
      42  
      43      f = &e;
      44      if (f->c - f->a > f->d - f->a)
      45        f->c = f->d;
      46    }
      47  }