# include	"AA_liba.h"

AAi4_i1(s, d)
register char	*s;
register char	*d;
{
	long	is;

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