view release on metacpan or  search on metacpan

xs/DVBT-ad-tie.c  view on Meta::CPAN

			ADA_UNEXPECTED_CALL ;
		}
		else if (THIS->type == ADAV_FILTERED)
		{
			THIS->filter_data.num_elems = 0 ;
		}
		else if (THIS->type == ADAV_LOGO)
		{
			THIS->logo_data.num_elems = 0 ;
		}
		else if (THIS->type == ADAV_CSV)
		{
			ADA_UNEXPECTED_CALL ;
		}
		ADA_END_THIS ;

# /*---------------------------------------------------------------------------------------------------*/
# /* Ignore - only valid for calling on filtered/logo/csv array */

void
ADAV::EXTEND(int size)

	INIT:
		ADA_METHOD(EXTEND);

	CODE:
		ADA_CHECK_THIS ;

		if (THIS->type == ADAV_ADATA)
		{
			ADA_UNEXPECTED_CALL ;
		}
		else if (THIS->type == ADAV_FILTERED)
		{
			// do nothing
		}
		else if (THIS->type == ADAV_LOGO)
		{
			// do nothing
		}
		else if (THIS->type == ADAV_CSV)
		{
			// do nothing
		}

		ADA_END_THIS ;


# /*---------------------------------------------------------------------------------------------------*/
# /*  */

void
ADAV::EXISTS(int idx)

	INIT:
		ADA_METHOD(EXISTS);

		HV *results ;
		int frame ;

	PPCODE:
		ADA_CHECK_THIS ;

		if (THIS->type == ADAV_ADATA)
		{
			if ((idx >= THIS->user_data->results_list_size) || (idx < 0))
				XSRETURN_NO ;
		}
		else if (THIS->type == ADAV_FILTERED)
		{
			if ((idx >= THIS->filter_data.num_elems) || (idx < 0))
				XSRETURN_NO ;
		}
		else if (THIS->type == ADAV_LOGO)
		{
			if ((idx >= THIS->logo_data.num_elems) || (idx < 0))
				XSRETURN_NO ;
		}
		else if (THIS->type == ADAV_CSV)
		{
			if ((idx >= THIS->csv_data.num_elems) || (idx < 0))
				XSRETURN_NO ;
		}
		ADA_END_THIS ;

		XSRETURN_YES;


# /*===================================================================================================*/


# /*---------------------------------------------------------------------------------------------------*/
# /* Update the gap count - only valid for filtered/logo array */

void
ADAV::update_gaps()

	INIT:
		ADA_METHOD(update_gaps);

	CODE:
		ADA_CHECK_THIS ;

		//fprintf(stderr, "ADAV:FETCHSIZE()\n") ;
		if (THIS->type == ADAV_ADATA)
		{
			ADA_UNEXPECTED_CALL ;
		}
		else if (THIS->type == ADAV_FILTERED)
		{
			filtered_update_gaps(THIS) ;
		}
		else if (THIS->type == ADAV_LOGO)
		{
			logo_update_gaps(THIS) ;
		}
		else if (THIS->type == ADAV_CSV)
		{
			ADA_UNEXPECTED_CALL ;
		}
		ADA_END_THIS ;