Used platform-independent aint printf patterns

This commit is contained in:
Roman Venediktov 2024-07-01 09:31:26 +02:00
parent 6a474f80f7
commit 468caac0f2
2 changed files with 11 additions and 17 deletions

View file

@ -618,7 +618,7 @@ aint inner_hash (aint depth, auint acc, void *p) {
extern void *LstringInt (char *b) {
aint n;
sscanf(b, "%lld", &n);
sscanf(b, "%" SCNdAI, &n);
return (void *)BOX(n);
}
@ -1274,7 +1274,7 @@ extern aint Lread () {
printf("> ");
fflush(stdout);
scanf("%lli", &result);
scanf("%" SCNdAI, &result);
return BOX(result);
}
@ -1291,7 +1291,7 @@ extern int Lbinoperror2 (void) {
/* Lwrite is an implementation of the "write" construct */
extern aint Lwrite (aint n) {
printf("%lld\n", UNBOX(n));
printf("%" PRIdAI "\n", UNBOX(n));
fflush(stdout);
return 0;