CDFstatus	T_IV
CDFid		T_IV
AV *		T_AVREF

############################################################################
INPUT
T_AVREF
	if (SvTYPE(SvRV($arg)) == SVt_PVAV) 
		$var = (AV *)SvRV($arg);
	else 
		croak (\" $arg is not an array reference \")
