/*
** integer manipulation
*/
#define NOCCARGC
getint(a) int *a; {return (*a);}	/* get integer from address a */
putint(a, i) int *a, i; {*a = i;}	/* put integer i at address a */