Berry fix pointer warning

This commit is contained in:
Stephan Hadinger 2022-04-26 23:01:10 +02:00
parent 828ed38762
commit 8547cdaa0d

View File

@ -214,19 +214,23 @@ static void save_proto_table(bvm *vm, void *fp, bproto *proto)
{ {
bproto **p = proto->ptab, **end; bproto **p = proto->ptab, **end;
save_long(fp, proto->nproto); /* proto count */ save_long(fp, proto->nproto); /* proto count */
if (p) {
for (end = p + proto->nproto; p < end; ++p) { for (end = p + proto->nproto; p < end; ++p) {
save_proto(vm, fp, *p); save_proto(vm, fp, *p);
} }
}
} }
static void save_upvals(void *fp, bproto *proto) static void save_upvals(void *fp, bproto *proto)
{ {
bupvaldesc *uv = proto->upvals, *end; bupvaldesc *uv = proto->upvals, *end;
save_byte(fp, proto->nupvals); /* upvals count */ save_byte(fp, proto->nupvals); /* upvals count */
if (uv) {
for (end = uv + proto->nupvals; uv < end; ++uv) { for (end = uv + proto->nupvals; uv < end; ++uv) {
save_byte(fp, uv->instack); save_byte(fp, uv->instack);
save_byte(fp, uv->idx); save_byte(fp, uv->idx);
} }
}
} }
static void save_proto(bvm *vm, void *fp, bproto *proto) static void save_proto(bvm *vm, void *fp, bproto *proto)