Function match_regex_scan_cb

src/arithmetic/string_funcs/string_funcs.c:298–315

} match_regex_scan_cb_args;

static int match_regex_scan_cb(int n, int pos, OnigRegion *region, void *arg) {
	match_regex_scan_cb_args *args = (match_regex_scan_cb_args *)arg;
	SIValue *list = args->list;
	const char *str = args->str;
	SIValue subList = SIArray_New(region->num_regs);
	assert(region->num_regs > 0);

	for (int i = 0; i < region->num_regs; i++) {
		int substr_len = region->end[i] - region->beg[i];
		char *substr = rm_strndup(str + region->beg[i], substr_len);
		SIArray_Append(&subList, SI_TransferStringVal(substr));
		rm_free(substr);
	}

	SIArray_Append(list, subList);
	SIValue_Free(subList);
	return 0;
}

// given a string and a regular expression,
// return an array of all matches and matching regions