Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-10-22 06:22:58 +02:00
Code Issues Releases Wiki Activity

Update Nyquist to v3.09.

Browse Source
This commit is contained in:
Leland Lucius
2015-04-07 22:10:17 -05:00
parent f88b27e6d8
commit 9fb0ce5b82
358 changed files with 26327 additions and 7043 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib-src/libnyquist/nyquist/nyqsrc/samples.c
View File

@@ -210,7 +210,10 @@ LVAL snd_fetch_array(sound_type s, long len, long step)
long i, maxlen, skip, fillptr;
float *samples;
LVAL result;
LVAL rslt_symbol = xlenter("*RSLT*");
setvalue(rslt_symbol, NULL);
if (len < 1) xlfail("len < 1");
if (!s->extra) { /* this is the first call, so fix up s */
@@ -232,6 +235,7 @@ LVAL snd_fetch_array(sound_type s, long len, long step)
if (s->INDEX == s->CNT) {
sound_get_next(s, &(s->CNT));
if (s->SAMPLES == zero_block->samples) {
setvalue(rslt_symbol, cvfixnum(fillptr));
if (s->TERMCNT < 0) s->TERMCNT = fillptr;
}
s->INDEX = 0;