Mercurial > urweb
diff src/c/urweb.c @ 276:ed4af33681d8
Switch base types to 64-bit versions
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 02 Sep 2008 14:59:27 -0400 |
parents | 4d80d6122df1 |
children | 137744c5b1ae |
line wrap: on
line diff
--- a/src/c/urweb.c Tue Sep 02 14:40:57 2008 -0400 +++ b/src/c/urweb.c Tue Sep 02 14:59:27 2008 -0400 @@ -233,7 +233,7 @@ int len; lw_check_heap(ctx, INTS_MAX); result = ctx->heap_front; - sprintf(result, "%d%n", n, &len); + sprintf(result, "%lld%n", n, &len); ctx->heap_front += len+1; return result; } @@ -282,7 +282,7 @@ static void lw_Basis_attrifyInt_w_unsafe(lw_context ctx, lw_Basis_int n) { int len; - sprintf(ctx->page_front, "%d%n", n, &len); + sprintf(ctx->page_front, "%lld%n", n, &len); ctx->page_front += len; } @@ -326,7 +326,7 @@ lw_check_heap(ctx, INTS_MAX); r = ctx->heap_front; - sprintf(r, "%d%n", n, &len); + sprintf(r, "%lld%n", n, &len); ctx->heap_front += len+1; return r; } @@ -375,7 +375,7 @@ static void lw_Basis_urlifyInt_w_unsafe(lw_context ctx, lw_Basis_int n) { int len; - sprintf(ctx->page_front, "%d%n", n, &len); + sprintf(ctx->page_front, "%lld%n", n, &len); ctx->page_front += len; } @@ -430,16 +430,16 @@ lw_Basis_int lw_Basis_unurlifyInt(lw_context ctx, char **s) { char *new_s = lw_unurlify_advance(*s); - int r; + lw_Basis_int r; - r = atoi(*s); + r = atoll(*s); *s = new_s; return r; } lw_Basis_float lw_Basis_unurlifyFloat(lw_context ctx, char **s) { char *new_s = lw_unurlify_advance(*s); - int r; + lw_Basis_float r; r = atof(*s); *s = new_s;