1extern long long foo ();
2
3long long
4sub1 ()
5{
6  char junk[10000];
7  register long long a, b, c;
8
9  b = foo ();
10
11  setjmp ();
12  a = foo ();
13  c = a - b;
14  return c;
15}
16