Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-12-02 14:50:17 +01:00
Code Issues Releases Wiki Activity

Misc changes to get new Nyquist to build

Browse Source
This commit is contained in:
Leland Lucius
2019-12-16 00:59:33 -06:00
parent d8431d984b
commit bd6ec9c0ed
6 changed files with 13 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib-src/libnyquist/nyquist/cmt/cmtio.h
View File

@@ -1,7 +1,7 @@
#define NOCHAR -2 #define NOCHAR -2
int IOinputfd; extern int IOinputfd;
int IOnochar; extern int IOnochar;
int IOsetup(int inputfd); int IOsetup(int inputfd);
int IOcleanup(void); int IOcleanup(void);

4
lib-src/libnyquist/nyquist/cmt/userio.c
View File

@@ -153,6 +153,10 @@ extern int debug;
#include "xlisp.h" #include "xlisp.h"
#endif #endif
int IOinputfd; /* input file descriptor (usually 0) */
int IOnochar; /* Value to be returned by IOgetchar()
where there is no input to be had */
/**************************************************************************** /****************************************************************************
* *

4
lib-src/libnyquist/nyquist/nyqsrc/seqfnint.c
View File

@@ -186,6 +186,8 @@ LVAL xlc_seq_get(void)
} }
#include "seqmwrite.h"
/* xlc_seq_write_smf -- interface to C routine seq_xlwrite_smf */ /* xlc_seq_write_smf -- interface to C routine seq_xlwrite_smf */
/**/ /**/
LVAL xlc_seq_write_smf(void) LVAL xlc_seq_write_smf(void)
@@ -214,8 +216,6 @@ LVAL xlc_seq_read_smf(void)
} }
#include "seqmwrite.h"
#include "seqread.h" #include "seqread.h"
/* xlc_seq_read -- interface to C routine seq_read */ /* xlc_seq_read -- interface to C routine seq_read */

1
lib-src/libnyquist/nyquist/nyqsrc/seqinterf.c
View File

@@ -10,6 +10,7 @@
#include "moxc.h" #include "moxc.h"
#include "seq.h" #include "seq.h"
#include "seqinterf.h" #include "seqinterf.h"
#include "seqmwrite.h"
/* seq_next -- advance to the next event, return TRUE if found */ /* seq_next -- advance to the next event, return TRUE if found */
/**/ /**/

2
lib-src/libnyquist/nyquist/nyqsrc/sndwritepa.c
View File

@@ -462,7 +462,7 @@ double sound_save(
buf, &ntotal); buf, &ntotal);
*duration = ntotal / *sr; *duration = ntotal / *sr;
if (sndfile) sf_close(sndfile); if (sndfile) sf_close(sndfile);
if (play != NIL) finish_audio(audio_stream); if (play != NIL) finish_audio();
} else { } else {
xlerror("sound_save: expression did not return a sound", xlerror("sound_save: expression did not return a sound",
result); result);

6
lib-src/libnyquist/nyquist/sys/unix/io.c
View File

@@ -16,10 +16,10 @@
#include <sgtty.h> #include <sgtty.h>
#include "cext.h" #include "cext.h"
int IOinputfd; /* input file descriptor (usually 0) */ extern int IOinputfd; /* input file descriptor (usually 0) */
int IOnochar; /* Value to be returned by IOgetchar() extern int IOnochar; /* Value to be returned by IOgetchar()
where there is no input to be had */ where there is no input to be had */
static struct sgttyb IOoldmodes, IOcurrentmodes; static struct sgttyb IOoldmodes, IOcurrentmodes;
/* Initial and current tty modes */ /* Initial and current tty modes */