view release on metacpan or  search on metacpan

PerlSDK.xs  view on Meta::CPAN

int
avs_setrankval(idx, valtype, value)
     avs_idxHdl_t idx
     avs_valtype_t valtype
     unsigned long value

int
avs_startdoc(idx, pDocId, flags, pStartLoc)
	avs_idxHdl_t idx
	char *pDocId
	int flags
	long &pStartLoc
	OUTPUT:
	RETVAL
	pStartLoc

void
avs_timer(current)
     unsigned long current

int
avs_total_docs(idx, pDoccount)
	avs_idxHdl_t idx
	long &pDoccount
	OUTPUT:
	RETVAL
	pDoccount

AV *
avs_version(license_key)
	char * license_key
     PREINIT:
        AV *arr;
        const char **lines;
     CODE:
	arr = newAV();
        lines = avs_version(license_key);
        while (*lines != 0) {
            av_push(arr, newSVpv(strdup(*lines), 0));
            lines++;
        }
        RETVAL = (AV *) arr;
     OUTPUT:
        RETVAL

avs_options_p_t
avs_create_options(limit, timeout, flags)
	long limit
	int timeout
	int flags
	CODE:
	RETVAL = malloc(sizeof(struct avs_options));
	RETVAL->limit = limit;
	RETVAL->timeout = timeout;
	RETVAL->flags = flags;
	OUTPUT:
	RETVAL

avs_parameters_t *
avs_create_parameters(_interface_version, license, ignored_thresh, chars_before_wildcard, unlimited_wild_words, indexformat, cache_threshold, options, charset, ntiers, nbuckets)
	char * _interface_version
	char * license
	int ignored_thresh
	int chars_before_wildcard
	int unlimited_wild_words
	int indexformat
	long cache_threshold
	int options
	int charset
	int ntiers
	int nbuckets
	CODE:
	RETVAL = malloc(sizeof(struct avs_parameters));
	RETVAL->_interface_version = _interface_version;
	RETVAL->license = license;
	RETVAL->ignored_thresh = ignored_thresh;
	RETVAL->chars_before_wildcard = chars_before_wildcard;
	RETVAL->unlimited_wild_words = unlimited_wild_words;
	RETVAL->indexformat = indexformat;
	RETVAL->cache_threshold = cache_threshold;
	RETVAL->options = options;
	RETVAL->charset = charset;
	RETVAL->ntiers = ntiers;
	RETVAL->nbuckets = nbuckets;
	OUTPUT:
	RETVAL