gdb/testsuite/gdb.guile/scm-frame.c

   1 int f2 (int a)
   2 {
   3   return ++a;
   4 }
   5
   6 int f1 (int a, int b)
   7 {
   8   return f2(a) + b;
   9 }
  10
  11 int block (void)
  12 {
  13   int i = 99;
  14   {
  15     double i = 1.1;
  16     double f = 2.2;
  17     {
  18       const char *i = "stuff";
  19       const char *f = "foo";
  20       const char *b = "bar";
  21       return 0; /* Block break here.  */
  22     }
  23   }
  24 }
  25
  26 int main (int argc, char *argv[])
  27 {
  28   block ();
  29   return f1 (1, 2);
  30 }