view release on metacpan or  search on metacpan

Ibam.xs  view on Meta::CPAN

	return SvTRUE(*hv_fetch((HV*)SvRV(sv), "do_second_correction", 20, 0));
}

MODULE = Sys::Ibam		PACKAGE = Sys::Ibam		

PROTOTYPES: ENABLE

void
ibam::new(do_second_correction=TRUE)
		int do_second_correction
	PPCODE:
		ST(0) = new_ibam_object(new ibam(), CLASS);
		HV* hv = (HV*)SvRV(ST(0));
		hv_store(hv, "do_second_correction", 20, newSViv(do_second_correction), 0);
		sv_2mortal(ST(0));
		XSRETURN(1);

void
ibam::DESTROY()

void