suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix warning in fasl.c

Browse Source 
original commit: a3ea77d5a81acbef7542942d3e2e261f02b58bcd
This commit is contained in:
Bob Burger 2019-11-05 11:47:24 -05:00
parent 05ced37f45
commit 3e9e4f684d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
c/fasl.c
View File

@ -383,7 +383,7 @@ static INT uf_read(unbufFaslFile uf, octet *s, iptr n) {
static void uf_skipbytes(unbufFaslFile uf, iptr n) { static void uf_skipbytes(unbufFaslFile uf, iptr n) {
switch (uf->type) { switch (uf->type) {
case UFFO_TYPE_GZ: case UFFO_TYPE_GZ:
if (S_glzseek(uf->file, n, SEEK_CUR) == -1) { if (S_glzseek(uf->file, (long)n, SEEK_CUR) == -1) {
S_error1("", "error seeking ~a", uf->path); S_error1("", "error seeking ~a", uf->path);
} }
break; break;