| 826 | } |
| 827 | |
| 828 | static void showallocs(CSOUND *csound) /* debugging aid */ |
| 829 | { |
| 830 | INSTRTXT *txtp; |
| 831 | INSDS *p; |
| 832 | |
| 833 | csound->Message(csound, "insno\tinstanc\tnxtinst\tprvinst\tnxtact\t" |
| 834 | "prvact\tnxtoff\tactflg\tofftim\n"); |
| 835 | for (txtp = &(csound->engineState.instxtanchor); |
| 836 | txtp != NULL; |
| 837 | txtp = txtp->nxtinstxt) |
| 838 | |
| 839 | if ((p = txtp->instance) != NULL) { |
| 840 | /* |
| 841 | * On Alpha, we print pointers as pointers. heh 981101 |
| 842 | * and now on all platforms (JPff) |
| 843 | */ |
| 844 | do { |
| 845 | csound->Message(csound, "%d\t%p\t%p\t%p\t%p\t%p\t%p\t%d\t%3.1f\n", |
| 846 | (int) p->insno, (void*) p, |
| 847 | (void*) p->nxtinstance, (void*) p->prvinstance, |
| 848 | (void*) p->nxtact, (void*) p->prvact, |
| 849 | (void*) p->nxtoff, p->actflg, p->offtim); |
| 850 | } while ((p = p->nxtinstance) != NULL); |
| 851 | } |
| 852 | } |
| 853 | |
| 854 | static void schedofftim(CSOUND *csound, INSDS *ip) |
| 855 | { /* put an active instr into offtime list */ |
no test coverage detected