reinit fix

vlazzarini · vlazzarini · commit add93178bda4 · 2018-01-07T17:47:39.000Z
diff --git a/OOps/goto_ops.c b/OOps/goto_ops.c
@@ -114,6 +114,8 @@ int rireturn(CSOUND *csound, LINK *p)
 {
     IGN(p);
     IGN(csound);
+    if (csound->oparms->realtime == 0)
+      p->h.insdshead->init_done = 1;
     return OK;
 }
 
@@ -129,6 +131,7 @@ int reinit(CSOUND *csound, GOTO *p)
       csound->reinitflag = p->h.insdshead->reinitflag = 0;
     }
     else {
+    csound->curip->init_done = 0;
     unsigned long wp = csound->alloc_queue_wp;
     csound->alloc_queue[wp].ip = csound->ids;
     csound->alloc_queue[wp].type = 2;

Original file line number	Diff line number	Diff line change
`@@ -114,6 +114,8 @@ int rireturn(CSOUND csound, LINK p)`
`114`	`114`	`{`
`115`	`115`	`IGN(p);`
`116`	`116`	`IGN(csound);`
	`117`	`+ if (csound->oparms->realtime == 0)`
	`118`	`+ p->h.insdshead->init_done = 1;`
`117`	`119`	`return OK;`
`118`	`120`	`}`
`119`	`121`
`@@ -129,6 +131,7 @@ int reinit(CSOUND csound, GOTO p)`
`129`	`131`	`csound->reinitflag = p->h.insdshead->reinitflag = 0;`
`130`	`132`	`}`
`131`	`133`	`else {`
	`134`	`+ csound->curip->init_done = 0;`
`132`	`135`	`unsigned long wp = csound->alloc_queue_wp;`
`133`	`136`	`csound->alloc_queue[wp].ip = csound->ids;`
`134`	`137`	`csound->alloc_queue[wp].type = 2;`