1char_autoincr (b1, c)
2    short *b1;
3    short c;
4{
5  *b1 = c;
6}
7