conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

reset ci->retc when pic_receive is called

This commit is contained in:
Yuichi Nishiwaki 2014-02-20 17:19:40 +09:00
parent bad8daa813
commit 213177eb10
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/cont.c
View File

@ -228,11 +228,11 @@ 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 < retc; ++i) { for (i = 0; i < n; ++i) {
if (i < n) {
argv[i] = ci->fp[i]; argv[i] = ci->fp[i];
} }
} ci->retc = 1;
return retc; return retc;
} }