mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-20 07:34:49 +00:00
Code Issues 1 Releases Wiki Activity

Merge branch 'master' into bundle-tools

Browse Source
This commit is contained in:
Calvin Rose 2024-05-19 15:52:25 -05:00
commit 6ac65e603d
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/core/pp.c
View File

@ -379,7 +379,10 @@ static int print_jdn_one(struct pretty *S, Janet x, int depth) {
break; break;
case JANET_NUMBER: case JANET_NUMBER:
janet_buffer_ensure(S->buffer, S->buffer->count + BUFSIZE, 2); janet_buffer_ensure(S->buffer, S->buffer->count + BUFSIZE, 2);
int count = snprintf((char *) S->buffer->data + S->buffer->count, BUFSIZE, "%.17g", janet_unwrap_number(x)); double num = janet_unwrap_number(x);
if (isnan(num)) return 1;
if (isinf(num)) return 1;
int count = snprintf((char *) S->buffer->data + S->buffer->count, BUFSIZE, "%.17g", num);
S->buffer->count += count; S->buffer->count += count;
break; break;
case JANET_SYMBOL: case JANET_SYMBOL: