1ase (p)
2     short *p;
3{
4  int a;
5
6  a = *p;
7  *p = a + 1;
8}
9