fix warning in fasl.c
original commit: a3ea77d5a81acbef7542942d3e2e261f02b58bcd
This commit is contained in:
parent
05ced37f45
commit
3e9e4f684d
2
c/fasl.c
2
c/fasl.c
|
@ -383,7 +383,7 @@ static INT uf_read(unbufFaslFile uf, octet *s, iptr n) {
|
|||
static void uf_skipbytes(unbufFaslFile uf, iptr n) {
|
||||
switch (uf->type) {
|
||||
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);
|
||||
}
|
||||
break;
|
||||
|
|
Loading…
Reference in New Issue
Block a user