Function PiuCode_findLineBreak

modules/piu/PC/Code/piuCode.c:1139–1177

}

void PiuCode_findLineBreak(xsMachine *the)
{
	PiuCode* self = PIU(Code, xsThis);
	uint32_t argc = xsToUnsigned(xsArgc);
	int32_t result = xsToInteger(xsArg(0));
	int32_t direction = (argc > 1) ? (xsToBoolean(xsArg(1)) ? +1 : -1) : + 1;
	if ((direction < 0) && (result == 0))
		result = 0;
	else if ((direction > 0) && (result >= (int32_t)(*self)->length))
		result = (*self)->length;
	else {
		char *s = PiuToString((*self)->string);
		char *p = s + fxUnicodeToUTF8Offset(s, result);
		char c;
		if (direction > 0) {
			result = (*self)->length;
			while ((c = *p)) {
				if ((c == 10) || (c == 13)) {
					result = fxUTF8ToUnicodeOffset(s, p + 1 - s);
					break;
				}
				p++;
			}
		}
		else {
			p--;
			result = 0;
			while (p >= s) {
				c = *p;
				if ((c == 10) || (c == 13)) {
					result = fxUTF8ToUnicodeOffset(s, p + 1 - s);
					break;
				}
				p--;
			}
		}
	}
	xsResult = xsInteger(result);
}

void PiuCode_findWordBreak(xsMachine *the)
{