view release on metacpan or  search on metacpan

XS.xs  view on Meta::CPAN

		sv_catsv(words, av_pop(stack));
	SvUTF8_on(words);
	return words;
}

MODULE = Lingua::RU::Money::XS		PACKAGE = Lingua::RU::Money::XS

void
rur2words(SV *amount)
	PROTOTYPE: $
	PPCODE:
		ST(0) = money2words(aTHX_ SvNV(amount), true, false);
		XSRETURN(1);

void
all2words(SV *amount)
	PROTOTYPE: $
	PPCODE:
		ST(0) = money2words(aTHX_ SvNV(amount), true, true);
		XSRETURN(1);