mirrors/alsa-lib
1
0
Fork 0
mirror of https://github.com/alsa-project/alsa-lib.git synced 2025-10-29 05:40:25 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Initial code for lisp interpreter

Browse source
This commit is contained in:
Jaroslav Kysela 2003-06-24 19:30:08 +00:00
parent 8b1ac5a638
commit 640ee8faa7
15 changed files with 1926 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

3
include/Makefile.am
View file

@ -9,7 +9,8 @@ alsainclude_HEADERS = asoundlib.h asoundef.h \
hwdep.h control.h mixer.h \
seq_event.h seq.h seqmid.h seq_midi_event.h \
conv.h instr.h iatomic.h \
pcm_ordinary.h mixer_ordinary.h
pcm_ordinary.h mixer_ordinary.h \
alisp.h
noinst_HEADERS = sys.h search.h list.h aserver.h local.h alsa-symbols.h

38
include/alisp.h Normal file
View file

@ -0,0 +1,38 @@
/*
* ALSA lisp implementation
* Copyright (c) 2003 by Jaroslav Kysela <perex@suse.cz>
*
*
* This library is free software; you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License as
* published by the Free Software Foundation; either version 2.1 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
struct alisp_cfg {
int verbose: 1,
warning: 1,
debug: 1;
snd_input_t *in; /* program code */
snd_output_t *out; /* program output */
snd_output_t *vout; /* verbose output */
snd_output_t *wout; /* warning output */
snd_output_t *dout; /* debug output */
snd_config_t *root;
snd_config_t *node;
};
int alsa_lisp(struct alisp_cfg *cfg);
extern struct alisp_object alsa_lisp_nil;
extern struct alisp_object alsa_lisp_t;

1
include/asoundlib.h
View file

@ -35,6 +35,7 @@
#include <fcntl.h>
#include <assert.h>
#include <endian.h>
#include <stdarg.h>
#include <sys/poll.h>
#include <errno.h>

1
include/local.h
View file

@ -29,6 +29,7 @@
#include <fcntl.h>
#include <assert.h>
#include <endian.h>
#include <stdarg.h>
#include <sys/poll.h>
#include <errno.h>

1
include/output.h
View file

@ -71,6 +71,7 @@ int snd_output_printf(snd_output_t *output, const char *format, ...)
__attribute__ ((format (printf, 2, 3)))
#endif
;
int snd_output_vprintf(snd_output_t *output, const char *format, va_list args);
int snd_output_puts(snd_output_t *output, const char *str);
int snd_output_putc(snd_output_t *output, int c);
int snd_output_flush(snd_output_t *output);