# include	"AA_liba.h"

AAi1_i2(s, d)
register char	*s;
register char	*d;
{
	short	id;

	id = ctoi(*s);
	AAbmove(&id, d, sizeof id);
}