[bugfix] segv on pic_receive
This commit is contained in:
parent
1d7e46fbdf
commit
19f426a4f4
|
@ -228,7 +228,7 @@ pic_receive(pic_state *pic, size_t n, pic_value *argv)
|
||||||
ci = pic->ci + 1;
|
ci = pic->ci + 1;
|
||||||
retc = ci->retc;
|
retc = ci->retc;
|
||||||
|
|
||||||
for (i = 0; i < n; ++i) {
|
for (i = 0; i < retc && i < n; ++i) {
|
||||||
argv[i] = ci->fp[i];
|
argv[i] = ci->fp[i];
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue