1ase (p)
2     short *p;
3{
4  int a;
5  a = p[1];
6  p[2] = a;
7  if ((short) a)
8    p[a]++;
9  return (a == 0);
10}
11