GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-17 00:39:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

fix the parsing of large integers

Browse Source
This commit is contained in:
Krasimir Angelov
2023-03-02 10:45:51 +01:00
parent f7ca8afa81
commit 97bb8ae3f6
1 changed files with 9 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/runtime/c/pgf/expr.cxx
View File

@@ -659,14 +659,21 @@ PgfExpr PgfExprParser::parse_term()
return e;
}
case PGF_TOKEN_INT: {
size_t size = (token_value->size + LINT_BASE_LOG - 1)/LINT_BASE_LOG;
size_t n_digits = token_value->size;
char *p_digits = token_value->text;
if (*p_digits == '-') {
n_digits--;
p_digits++;
}
size_t size = (n_digits + LINT_BASE_LOG - 1)/LINT_BASE_LOG;
uintmax_t *value = (uintmax_t *) alloca(size*sizeof(uintmax_t));
char *p = token_value->text + token_value->size;
for (size_t i = size; i > 0; i--) {
char tmp = *p; *p = 0;
char *s = p - LINT_BASE_LOG;
if (s < token_value->text)
if (s <= p_digits)
s = token_value->text;
value[i-1] = (uintmax_t)
(s == token_value->text) ? strtoll(s, NULL, 10)