Function fxGetNextNumberB

xs/sources/xsLexical.c:358–387

}

void fxGetNextNumberB(txParser* parser)
{
	txString p = parser->buffer;
	txString q = p + parser->bufferSize;
	int c;
	fxGetNextCharacter(parser);
	p = fxGetNextDigits(parser, fxGetNextDigitsB, p, q, 1);
	c = parser->character;
	if (p == q) {
		fxReportMemoryError(parser, parser->states[2].line, "number overflow");
	}
	if (c == 'n')
		fxGetNextCharacter(parser);
	if (fxIsIdentifierFirst(parser->character)) {
		fxReportParserError(parser, parser->states[2].line, "invalid number");
	}
	*p = 0;
	q = parser->buffer;
	if (c == 'n') {
		parser->states[2].bigint.data = fxNewParserChunk(parser, fxBigIntMaximumB(mxPtrDiff(p - q)));
		fxBigIntParseB(&parser->states[2].bigint, q, mxPtrDiff(p - q));
		parser->states[2].token = XS_TOKEN_BIGINT;
	}
	else {
		txNumber n = 0;
		while ((c = *q++))
			n = (n * 2) + (c - '0');
		fxGetNextNumber(parser, n);
	}
}

void fxGetNextNumberE(txParser* parser, int dot)
{